Copepod Collection

Copepods were collected at approximately weekly intervals from Lake Champlain (Burlington Fishing Pier). Plankton was collected from the top 3 meters using a 250 um mesh net.

# Lake Champlain near Burlington, VT
siteNumber = "04294500"
ChamplainInfo = readNWISsite(siteNumber)
parameterCd = "00010"
startDate = "2023-01-01"
endDate = ""
#statCd = c("00001", "00002","00003", "00011") # 1 - max, 2 - min, 3 = mean

# Constructs the URL for the data wanted then downloads the data
url = constructNWISURL(siteNumbers = siteNumber, parameterCd = parameterCd, 
                       startDate = startDate, endDate = endDate, service = "uv")

raw_temps = importWaterML1(url, asDateTime = T) %>% 
  mutate("date" = as.Date(dateTime)) %>% 
  select(dateTime, tz_cd, date, degC = X_00010_00000)

temp_data =  raw_temps %>% 
  select(date, "temp" = degC)

Collections began in late May 2023. Several gaps are present, but collections have continued at roughly weekly intervals since then. Copepods from 47 collections were used to make a total of 1282 thermal limit measurements. Over this time period, collection temperatures ranged from 2.5 to 26.5°C.

There is substantial variation in thermal limits across the species collected. There is also some degree of variation within the species, with thermal limits increasing slightly during the summer.

## Daily values for the period examined by dataset
collection_conditions = temp_data %>%
  ungroup() %>% 
  group_by(date) %>% 
  summarise(mean_temp = mean(temp),
            med_temp = median(temp),
            var_temp = var(temp), 
            min_temp = min(temp), 
            max_temp = max(temp)) %>% 
  mutate("range_temp" = max_temp - min_temp,
         date = as.Date(date)) %>% 
  ungroup() %>%  
  filter(date >= (min(as.Date(full_data$collection_date)) - 7)) %>% 
  left_join(unique(select(full_data, collection_date, collection_temp)), by = join_by(date == collection_date))

## Mean female thermal limits for each species, grouped by collection
species_summaries = full_data %>%  
  #filter(sex == "female") %>% 
  group_by(sp_name, collection_date, collection_temp) %>%  
  summarise("mean_ctmax" = mean(ctmax),
            "sample_size" = n(),
            "ctmax_st_err" = (sd(ctmax) / sqrt(sample_size)),
            "ctmax_var" = var(ctmax), 
            "mean_size" = mean(size),
            "size_st_err" = (sd(size) / sqrt(sample_size)),
            "size_var" = var(size)) %>%  
  ungroup() %>% 
  complete(sp_name, collection_date) %>% 
  arrange(desc(sample_size))

adult_summaries = full_data %>%  
  filter(sex == "female") %>% 
  group_by(sp_name, collection_date, collection_temp) %>%  
  summarise("mean_ctmax" = mean(ctmax),
            "sample_size" = n(),
            "ctmax_st_err" = (sd(ctmax) / sqrt(sample_size)),
            "ctmax_var" = var(ctmax), 
            "mean_size" = mean(size),
            "size_st_err" = (sd(size) / sqrt(sample_size)),
            "size_var" = var(size)) %>%  
  ungroup() %>% 
  complete(sp_name, collection_date) %>% 
  arrange(desc(sample_size))


ggplot() + 
  geom_vline(data = unique(select(full_data, collection_date)), 
             aes(xintercept = as.Date(collection_date)),
             colour = "grey90",
             linewidth = 1) + 
  geom_line(data = collection_conditions, 
            aes(x = as.Date(date), y = mean_temp),
            colour = "black", 
            linewidth = 2) + 
  # geom_errorbar(data = species_summaries,
  #               aes(x = as.Date(collection_date),
  #                   ymin = mean_ctmax - ctmax_st_err, ymax = mean_ctmax + ctmax_st_err,
  #                   colour = sp_name),
  #               position = position_dodge(width = 1),
  #               width = 5, linewidth = 1) +
  # geom_point(data = adult_summaries, 
  #            aes(x = as.Date(collection_date), y = mean_ctmax, colour = sp_name, size = sample_size)) + 
  geom_point(data = full_data, 
             aes(x = as.Date(collection_date), y = ctmax, colour = sp_name),
             size = 2, position = position_jitter(width = 1, height = 0)) + 
  scale_colour_manual(values = species_cols) + 
  labs(x = "Date", 
       y = "Temperature (°C)", 
       colour = "Species",
       size = "Sample Size") + 
  theme_matt() + 
  theme(legend.position = "right")

collection_conditions %>% 
  drop_na(collection_temp) %>%  
  ggplot(aes(x = max_temp, y = collection_temp)) + 
  geom_abline(intercept = 0, slope = 1,
              linewidth = 1, colour = "grey") + 
  geom_point(size = 3) +
  scale_x_continuous(breaks = c(5,15,25)) + 
  scale_y_continuous(breaks = c(5,15,25)) + 
  labs(x = "Max. Temp. from Sensor (°C)",
       y = "Collection Temp. (°C)") + 
  theme_matt()

round_summary = full_data %>% 
  group_by(collection_date, collection_temp) %>% 
  summarise(mean_ctmax = mean(ctmax))

ggplot(data = round_summary) + 
  geom_hline(yintercept = 40) + 
  geom_point(aes(x = as_date(collection_date), y = mean_ctmax),
             colour = "tomato3",
             size = 5) +
  geom_bar(aes(x = as_date(collection_date), y = mean_ctmax),
           stat = "identity",
           fill = "white", 
           colour = "grey30") +
  geom_bar(aes(x = as_date(collection_date), y = collection_temp),
           stat = "identity",
           fill = "darkgoldenrod1") + 
  ylim(-3, 40) + 
  coord_polar(start = 0) + 
  theme_void()

ggplot() + 
  geom_hline(yintercept = 
               c(max(full_data$collection_temp),
                 min(full_data$collection_temp)), 
             colour = "grey60",
             linewidth = c(2,1), 
             alpha = 0.5) + 
  geom_bar(data = unique(select(full_data, collection_date, collection_temp)), 
           aes(x = as_date(collection_date), y = collection_temp),
           stat = "identity",
           fill = "grey30") + 
  geom_point(data = full_data, 
             aes(x = as_date(collection_date), y = ctmax),
             position = position_jitter(width = 0.7, height = 0),
             colour = "grey30",
             alpha = 0.5) + 
  ylim(-3, 40) + 
  coord_polar(start = 0) + 
  theme_void()

Size also varied, but primarily between rather than within species.

ggplot() + 
  geom_vline(data = unique(select(full_data, collection_date)), 
             aes(xintercept = as.Date(collection_date)),
             colour = "grey90",
             linewidth = 1) + 
  geom_line(data = collection_conditions, 
            aes(x = as.Date(date), y = mean_temp),
            colour = "black", 
            linewidth = 2) + 
  # geom_errorbar(data = species_summaries,
  #               aes(x = as.Date(collection_date), 
  #                   ymin = mean_ctmax - ctmax_st_err, ymax = mean_ctmax + ctmax_st_err,
  #                   colour = sp_name),
  #               position = position_dodge(width = 1),
  #               width = 5, linewidth = 1) + 
  geom_point(data = adult_summaries, 
             aes(x = as.Date(collection_date), y = mean_size * 40, colour = sp_name, size = sample_size),
             position = position_dodge(width = 1)) + 
  scale_colour_manual(values = species_cols) + 
  scale_y_continuous(
    name = "Temperature", # Features of the first axis
    sec.axis = sec_axis(~./40, name="Prosome Length (mm)"), # Add a second axis and specify its features
    breaks = c(0,5,10,15,20,25,30)
  ) + 
  labs(x = "Date", 
       y = "Temperature (°C)", 
       colour = "Species") + 
  theme_matt() + 
  theme(legend.position = "right")

Shown below is CTmax and body size for the species with the most data (Skistodiaptomus, L. minutus, L. sicilis, and Epischura), plotted against the day of the year for each sex/stage separately.

ctmax_feature = full_data %>%  
  mutate(doy = yday(collection_date)) %>% 
  filter(sp_name %in% c("Skistodiaptomus oregonensis", "Leptodiaptomus minutus", "Leptodiaptomus sicilis", "Epischura lacustris")) %>% 
  ggplot(aes(x = as.Date(collection_date), y = ctmax, colour = sp_name)) + 
  facet_grid(sp_name~sex) + 
  geom_point() + 
  scale_colour_manual(values = species_cols) + 
  labs(x = "Day of the Year", 
       y = "CTmax (°C)") + 
  theme_matt_facets() +
  theme(axis.text.x = element_text(angle = 300, hjust = 0, vjust = 0.5),
        legend.position = "none")

size_feature = full_data %>%  
  mutate(doy = yday(collection_date)) %>% 
  filter(sp_name %in% c("Skistodiaptomus oregonensis", "Leptodiaptomus minutus", "Leptodiaptomus sicilis", "Epischura lacustris")) %>% 
  ggplot(aes(x = as.Date(collection_date), y = size, colour = sp_name)) + 
  facet_grid(sp_name~sex) + 
  geom_point() + 
  scale_colour_manual(values = species_cols) + 
  labs(x = "Day of the Year", 
       y = "Size (mm)") + 
  theme_matt_facets() +
  theme(axis.text.x = element_text(angle = 300, hjust = 0, vjust = 0.5),
        legend.position = "none")

ggarrange(ctmax_feature, size_feature, common.legend = T, legend = "none")

full_data %>%  
  filter(sp_name != "Osphranticum labronectum") %>% 
  mutate(sp_name = as.factor(sp_name),
         sp_name = fct_reorder(sp_name, ctmax)) %>% 
  ggplot(aes(x = lubridate::as_date(collection_date), 
             y = sp_name, fill = sp_name)) + 
  # geom_vline(xintercept = as_date(
  #   c("2023-05-01",
  #     "2023-09-01",
  #     "2024-01-01",
  #     "2024-05-01")),
  #   colour = "grey",
  #   linewidth = 1) + 
  geom_density_ridges(bandwidth = 30,
                      jittered_points = TRUE, 
                      point_shape = 21,
                      point_size = 1,
                      point_colour = "grey30",
                      point_alpha = 0.6,
                      alpha = 0.9,
                      position = position_points_jitter(
                        height = 0.1, width = 0)) + 
  scale_fill_manual(values = species_cols) + 
  scale_x_date(date_breaks = "4 months",
               date_labels = "%b") + 
  labs(x = "Day of Year", 
       y = "Species") + 
  theme_matt() + 
  #theme_ridges(grid = T) + 
  theme(legend.position = "none",
        axis.text.x = element_text(angle = 270, hjust = 0, vjust = 0.5))

adult_summaries %>% 
  ungroup() %>% 
  mutate(collection_num = as.numeric(factor(collection_date))) %>% 
  group_by(collection_date) %>%  
  arrange(collection_date) %>% 
  select(sp_name, collection_date, collection_num, sample_size) %>% 
  mutate(sample_size = replace_na(sample_size, 0)) %>% 
  mutate(total = sum(sample_size),
         percentage = sample_size / total,
         collection_date = lubridate::as_date(collection_date)) %>% 
  ggplot(aes(x = collection_date, y = percentage, fill = sp_name)) + 
  geom_area() + 
  scale_fill_manual(values = species_cols) + 
  scale_y_continuous(breaks = c(0,1)) + 
  labs(x = "Collection Date", 
       y = "Proportion", 
       fill = "Species") + 
  theme_minimal(base_size = 20) + 
  theme(panel.grid = element_blank(),
        axis.ticks = element_line())

pathogen_cols = c("no" = "grey95", "cloudy" = "honeydew3", "spot" = "antiquewhite3", "other" = "tomato3")

full_data %>% 
  select(collection_date, dev_eggs, pathogen, lipids, sp_name, sex) %>% 
  group_by() %>% 
  filter(sex != "juvenile") %>% 
  group_by(collection_date) %>% 
  count(pathogen) %>% 
  filter(pathogen != "uncertain") %>% 
  pivot_wider(id_cols = "collection_date", 
              names_from = pathogen, 
              values_from = n,
              values_fill = 0) %>% 
  mutate(total = sum(no, cloudy, spot, other)) %>% 
  pivot_longer(cols = c(no, cloudy, spot, other),
               names_to = "pathogen", 
               values_to = "count") %>% 
  mutate(percent = count/total,
         collection_date = lubridate::as_date(collection_date),
         pathogen = fct_relevel(pathogen, "no", "cloudy", "spot", "other")) %>% 
  ggplot(aes(x = collection_date, y = percent, fill = pathogen)) + 
  geom_area() + 
  scale_fill_manual(values = pathogen_cols) + 
  scale_y_continuous(breaks = c(0,1)) + 
  labs(x = "Collection Date", 
       y = "Proportion", 
       fill = "Pathogen") + 
  theme_minimal(base_size = 20) + 
  theme(panel.grid = element_blank(),
        axis.ticks = element_line())

dev_eggs_cols = c("no" = "grey95", "yes" = "lightblue3")

full_data %>% 
  select(collection_date, dev_eggs, pathogen, lipids, sp_name, sex) %>% 
  group_by(sp_name) %>% 
  filter(sex != "juvenile") %>% 
  group_by(sp_name, collection_date) %>% 
  count(dev_eggs) %>% 
  filter(dev_eggs != "uncertain") %>% 
  pivot_wider(id_cols = c("collection_date", "sp_name"), 
              names_from = dev_eggs, 
              values_from = n,
              values_fill = 0) %>% 
  mutate(total = sum(no, yes)) %>% 
  pivot_longer(cols = c(no, yes),
               names_to = "dev_eggs", 
               values_to = "count") %>% 
  mutate(percent = count/total,
         collection_date = lubridate::as_date(collection_date),
         dev_eggs = fct_relevel(dev_eggs, "no", "yes")) %>% 
  ungroup() %>% 
  complete(collection_date, nesting(sp_name, dev_eggs), fill = list(percent = 1)) %>% 
  mutate(percent = if_else(is.na(total) & dev_eggs == "yes", 0, percent)) %>% 
  ggplot(aes(x = collection_date, y = percent, fill = dev_eggs)) + 
  facet_wrap(sp_name~., ncol = 1) + 
  geom_area() + 
  scale_fill_manual(values = dev_eggs_cols) + 
  scale_y_continuous(breaks = c(0,1)) + 
  labs(x = "Collection Date", 
       y = "Proportion", 
       fill = "Developing \nEggs") + 
  theme_minimal(base_size = 20) + 
  theme(panel.grid = element_blank(),
        axis.ticks = element_line())

lipid_cols = c("no" = "grey95", "yes" = "sienna2")

full_data %>% 
  select(collection_date, dev_eggs, pathogen, lipids, sp_name, sex) %>% 
  group_by(sp_name) %>% 
  filter(sex != "juvenile") %>% 
  group_by(sp_name, collection_date) %>% 
  count(lipids) %>% 
  filter(lipids != "uncertain") %>% 
  pivot_wider(id_cols = c("collection_date", "sp_name"), 
              names_from = lipids, 
              values_from = n,
              values_fill = 0) %>% 
  mutate(total = sum(no, yes)) %>% 
  pivot_longer(cols = c(no, yes),
               names_to = "lipids", 
               values_to = "count") %>% 
  mutate(percent = count/total,
         collection_date = lubridate::as_date(collection_date),
         lipids = fct_relevel(lipids, "no", "yes")) %>% 
  ungroup() %>% 
  complete(collection_date, nesting(sp_name, lipids), fill = list(percent = 1)) %>% 
  mutate(percent = if_else(is.na(total) & lipids == "yes", 0, percent)) %>% 
  ggplot(aes(x = collection_date, y = percent, fill = lipids)) + 
  facet_wrap(sp_name~., ncol = 1) + 
  geom_area() + 
  scale_fill_manual(values = lipid_cols) + 
  scale_y_continuous(breaks = c(0,1)) + 
  labs(x = "Collection Date", 
       y = "Proportion", 
       fill = "Lipids\nPresent") + 
  theme_minimal(base_size = 20) + 
  theme(panel.grid = element_blank(),
        axis.ticks = element_line())

Temperature Variability

Lake Champlain is highly seasonal, with both average temperatures and temperature variability changing throughout the year. These patterns in the experienced thermal environment may drive the observed variation in copepod thermal limits. However, the time period affecting copepod thermal limits is unknown. Depending the on the duration of time considered, there are large changes in the experienced environment, in particular regarding the temperature range and variance. Consider for example three time periods: the day of collection, one week prior to collection, and four weeks prior to collection. While the overall pattern is similar, we can see that, unsurprisingly, considering longer periods of time results in larger ranges and slightly changes the pattern of variance experienced.

## Daily values
daily_temp_data = temp_data %>%
  ungroup() %>% 
  group_by(date) %>% 
  summarise(mean_temp = mean(temp),
            med_temp = median(temp),
            var_temp = var(temp), 
            min_temp = min(temp), 
            max_temp = max(temp)) %>% 
  mutate("range_temp" = max_temp - min_temp)

day_prior_temp_data = temp_data %>% 
  ungroup() %>% 
  group_by(date) %>% 
  summarise(mean_temp = mean(temp),
            med_temp = median(temp),
            var_temp = var(temp), 
            min_temp = min(temp), 
            max_temp = max(temp)) %>% 
  mutate(date = date + 1) %>% 
  rename_with(.fn = ~ paste0("prior_day_", .x), .cols = c(-date))

daily_plot = daily_temp_data %>% 
  pivot_longer(cols = c(-date),
               names_to = "parameter", 
               values_to = "temp") %>% 
  ggplot(aes(x = date, y = temp, colour = parameter)) + 
  geom_line(linewidth = 1) + 
  scale_colour_manual(values = c(
    "mean_temp" = "olivedrab3",
    "med_temp" = "seagreen3",
    "max_temp" = "tomato",  
    "min_temp" = "dodgerblue",
    "range_temp" = "goldenrod3",
    "var_temp" = "darkgoldenrod1"
  )) + 
  scale_x_continuous(breaks = as.Date(c("2023-01-01", "2023-04-01", "2023-07-01"))) + 
  ggtitle("Daily Values") + 
  labs(y = "Temperature (°C)",
       x = "") + 
  theme_bw(base_size = 20) + 
  theme(panel.grid = element_blank(),
        axis.text.x = element_text(angle = 270, hjust = 0, vjust = 0.5))
## Defining the function to get predictor values for periods of different lengths
get_predictors = function(daily_values, raw_temp, n_days){
  prefix = str_replace_all(xfun::numbers_to_words(n_days), pattern = " ", replacement = "-")
  
  mean_values = daily_values %>% 
    ungroup() %>% 
    mutate(mean_max = slide_vec(.x = max_temp, .f = mean, .before = n_days, .complete = T),
           mean_min = slide_vec(.x = min_temp, .f = mean, .before = n_days, .complete = T),
           mean_range = slide_vec(.x = range_temp, .f = mean, .before = n_days, .complete = T)) %>% 
    select(date, mean_max, mean_min, mean_range) %>% 
    rename_with( ~ paste(prefix, "day", .x, sep = "_"), .cols = c(-date))
  
  period_values = raw_temp %>% 
    mutate(mean = slide_index_mean(temp, i = date, before = days(n_days), 
                                   na_rm = T),
           max = slide_index_max(temp, i = date, before = days(n_days), 
                                 na_rm = T),
           min = slide_index_min(temp, i = date, before = days(n_days),
                                 na_rm = T),
           med = slide_index_dbl(temp, .i = date, .before = days(n_days), 
                                 na_rm = T, .f = median),
           var = slide_index_dbl(temp, .i = date, .before = days(n_days), 
                                 .f = var),
           range = max - min) %>%  
    select(-temp) %>%  
    distinct() %>% 
    rename_with( ~ paste(prefix, "day", .x, sep = "_"), .cols = c(-date))%>% 
    inner_join(mean_values, by = c("date")) %>%  
    drop_na()
  
  return(period_values)
}
# ## Getting predictor variables for different periods
# 
# ### Short (three days)
# three_day_temps = get_predictors(daily_values = daily_temp_data, 
#                                  raw_temp = temp_data, 
#                                  n_days = 3)
# 
# ### ONE WEEK
week_temps = get_predictors(daily_values = daily_temp_data,
                            raw_temp = temp_data,
                            n_days = 7)

week_plot = week_temps %>%
  pivot_longer(cols = c(-date),
               names_to = "parameter",
               values_to = "temp") %>%
  filter(parameter %in% c("seven_day_mean",
                          "seven_day_med",
                          "seven_day_max",
                          "seven_day_min",
                          "seven_day_var",
                          "seven_day_range")) %>%
  mutate(parameter = paste(word(parameter, start = 3, sep = fixed("_")), "_temp", sep = "")) %>%
  ggplot(aes(x = date, y = temp, colour = parameter)) +
  geom_line(linewidth = 1) +
  scale_colour_manual(values = c(
    "mean_temp" = "olivedrab3",
    "med_temp" = "seagreen3",
    "max_temp" = "tomato",
    "min_temp" = "dodgerblue",
    "range_temp" = "goldenrod3",
    "var_temp" = "darkgoldenrod1"
  )) +
  scale_x_continuous(breaks = as.Date(c("2023-01-01", "2023-04-01", "2023-07-01"))) +
  ggtitle("One Week") +
  labs(y = "Temperature (°C)",
       x = "") +
  theme_bw(base_size = 20) +
  theme(panel.grid = element_blank(),
        axis.text.x = element_text(angle = 270, hjust = 0, vjust = 0.5))
# 
# 
# ### TWO WEEKS
# two_week_temps = get_predictors(daily_values = daily_temp_data, 
#                                 raw_temp = temp_data, 
#                                 n_days = 14)
# 
# two_week_plot = two_week_temps %>% 
#   pivot_longer(cols = c(-date),
#                names_to = "parameter", 
#                values_to = "temp") %>% 
#   filter(parameter %in% c("fourteen_day_mean",
#                           "fourteen_day_med",
#                           "fourteen_day_max", 
#                           "fourteen_day_min", 
#                           "fourteen_day_var",
#                           "fourteen_day_range")) %>% 
#   mutate(parameter = paste(word(parameter, start = 3, sep = fixed("_")), "_temp", sep = "")) %>% 
#   ggplot(aes(x = date, y = temp, colour = parameter)) + 
#   geom_line(linewidth = 1) + 
#   scale_colour_manual(values = c(
#     "mean_temp" = "olivedrab3",
#     "med_temp" = "seagreen3",
#     "max_temp" = "tomato",  
#     "min_temp" = "dodgerblue",
#     "range_temp" = "goldenrod3",
#     "var_temp" = "darkgoldenrod1"
#   )) + 
#   scale_x_continuous(breaks = as.Date(c("2023-01-01", "2023-04-01", "2023-07-01"))) + 
#   ggtitle("Two Weeks") + 
#   labs(y = "Temperature (°C)",
#        x = "") + 
#   theme_bw(base_size = 20) + 
#   theme(panel.grid = element_blank(),
#         axis.text.x = element_text(angle = 270, hjust = 0, vjust = 0.5))
# 
# 
# ### FOUR WEEKS
four_week_temps = get_predictors(daily_values = daily_temp_data,
                                 raw_temp = temp_data,
                                 n_days = 28)

four_week_plot = four_week_temps %>%
  pivot_longer(cols = c(-date),
               names_to = "parameter",
               values_to = "temp") %>%
  filter(parameter %in% c("twenty-eight_day_mean",
                          "twenty-eight_day_med",
                          "twenty-eight_day_max",
                          "twenty-eight_day_min",
                          "twenty-eight_day_var",
                          "twenty-eight_day_range")) %>%
  mutate(parameter = paste(word(parameter, start = 3, sep = fixed("_")), "_temp", sep = "")) %>%
  ggplot(aes(x = date, y = temp, colour = parameter)) +
  geom_line(linewidth = 1) +
  scale_colour_manual(values = c(
    "mean_temp" = "olivedrab3",
    "med_temp" = "seagreen3",
    "max_temp" = "tomato",
    "min_temp" = "dodgerblue",
    "range_temp" = "goldenrod3",
    "var_temp" = "darkgoldenrod1"
  )) +
  scale_x_continuous(breaks = as.Date(c("2023-01-01", "2023-04-01", "2023-07-01"))) +
  ggtitle("Four Weeks") +
  labs(y = "Temperature (°C)",
       x = "") +
  theme_bw(base_size = 20) +
  theme(panel.grid = element_blank(),
        axis.text.x = element_text(angle = 270, hjust = 0, vjust = 0.5))
# 
# 
# ### EIGHT WEEKS
# eight_week_temps = get_predictors(daily_values = daily_temp_data, 
#                                   raw_temp = temp_data, 
#                                   n_days = 56)
# 
# eight_week_plot = eight_week_temps %>% 
#   pivot_longer(cols = c(-date),
#                names_to = "parameter", 
#                values_to = "temp") %>% 
#   filter(parameter %in% c("fifty-six_day_mean",
#                           "fifty-six_day_med",
#                           "fifty-six_day_max", 
#                           "fifty-six_day_min", 
#                           "fifty-six_day_var",
#                           "fifty-six_day_range")) %>% 
#   mutate(parameter = paste(word(parameter, start = 3, sep = fixed("_")), "_temp", sep = "")) %>% 
#   ggplot(aes(x = date, y = temp, colour = parameter)) + 
#   geom_line(linewidth = 1) + 
#   scale_colour_manual(values = c(
#     "mean_temp" = "olivedrab3",
#     "med_temp" = "seagreen3",
#     "max_temp" = "tomato",  
#     "min_temp" = "dodgerblue",
#     "range_temp" = "goldenrod3",
#     "var_temp" = "darkgoldenrod1"
#   )) + 
#   scale_x_continuous(breaks = as.Date(c("2023-01-01", "2023-04-01", "2023-07-01"))) + 
#   ggtitle("Eight Weeks") + 
#   labs(y = "Temperature (°C)",
#        x = "") + 
#   theme_bw(base_size = 20) + 
#   theme(panel.grid = element_blank(),
#         axis.text.x = element_text(angle = 270, hjust = 0, vjust = 0.5))
# 
ggarrange(daily_plot, week_plot, four_week_plot, 
          common.legend = T, nrow = 1, legend = "bottom")

The different time periods examined by this climate data highlights that the relationship between minimum and maximum temperatures changes based on the window examined. For example, minimum and maximum temperatures experienced over weekly intervals are closely linked, whereas there is a distinct seasonal cycle in the relationship between minimum and maximum temperatures experienced over periods of four weeks.

one_week_doy_data = week_temps %>% 
  mutate(doy = yday(date))

one_week_temp_circle = ggplot(one_week_doy_data, aes(x = seven_day_mean_max, y = seven_day_mean_min, colour = doy)) + 
  geom_point() + 
  scale_colour_gradient2(
    high = "dodgerblue4",
    mid = "coral2",
    low = "dodgerblue4",
    midpoint = 182.5) + 
  labs(x = "Max. Temp. (°C)",
       y = "Min. Temp. (°C)") + 
  labs(x = "Max. Temp. (°C)",
       y = "Min. Temp. (°C)") + 
  ggtitle("One Week") + 
  theme_matt()

four_week_doy_data = four_week_temps %>% 
  mutate(doy = yday(date))

four_week_temp_circle = ggplot(four_week_doy_data, aes(x = `twenty-eight_day_max`, y = `twenty-eight_day_min`, colour = doy)) + 
  geom_point() + 
  scale_colour_gradient2(
    high = "dodgerblue4",
    mid = "coral2",
    low = "dodgerblue4",
    midpoint = 182.5) + 
  labs(x = "Max. Temp. (°C)",
       y = "Min. Temp. (°C)") + 
  ggtitle("Four Week") + 
  theme_matt()

ggarrange(one_week_temp_circle, four_week_temp_circle,
          common.legend = T, legend = "bottom")

The thermal environment over any period of time may drive patterns in thermal acclimation. To explore the potential effects of different acclimation windows, we examined the correlation between thermal limits and different representations of the thermal environment for different periods of time. Shown below are the correlation coefficients for these relationships. Each facet shows the relationship for a different dimension of the thermal environment. Correlation coefficients are plotted for different durations, for species that were collected more than five times. Only data for mature female copepods was included.

We can see that, in general, copepods are responding to proximate cues from the thermal environment, with correlations generally dropping off substantially as acclimation window duration increases. An exception is Epischura lacustris, which appears to be responding to maximum temperatures experienced over a 20 day time period.

### Pulling predictors and measuring correlations for much finer timescales; 1-56 days

num_colls = full_data %>% 
  filter(sex == "female") %>% 
  select(collection_date, sp_name) %>%  
  distinct() %>%  
  count(sp_name) %>% 
  filter(n >= 5)

corr_vals = data.frame()

dur_vals = c(1:50)
for(i in dur_vals){
  
  duration_temps = get_predictors(daily_values = daily_temp_data, 
                                  raw_temp = temp_data, 
                                  n_days = i) %>% 
    filter(date %in% as_date(unique(full_data$collection_date)))
  
  corr_data = full_data %>%
    filter(sp_name %in% num_colls$sp_name) %>% 
    filter(sex == "female") %>% 
    mutate(collection_date = as.Date(collection_date)) %>% 
    inner_join(duration_temps, join_by(collection_date == date)) %>% 
    pivot_longer(cols = c(collection_temp, contains("day_")),
                 values_to = "value", 
                 names_to = "predictor") %>%  
    group_by(sp_name, predictor) %>% 
    summarise(correlation = cor.test(ctmax, value)$estimate,
              p.value = cor.test(ctmax, value)$p.value,
              ci_low = cor.test(ctmax, value)$conf.int[1],
              ci_high = cor.test(ctmax, value)$conf.int[2],
              .groups = "keep") %>% 
    filter(predictor != "collection_temp") %>% 
    mutate(sig = ifelse(p.value <0.05, "Sig.", "Non Sig.")) %>% 
    separate(predictor, "_day_", into = c(NA, "parameter")) %>% 
    mutate(duration = i)
  
  corr_vals = bind_rows(corr_vals, corr_data)
}

coll_corr = full_data %>%
  filter(sp_name %in% num_colls$sp_name) %>% 
  filter(sex == "female") %>% 
  group_by(sp_name) %>% 
  summarise(correlation = cor.test(ctmax, collection_temp)$estimate,
            p.value = cor.test(ctmax, collection_temp)$p.value,
            ci_low = cor.test(ctmax, collection_temp)$conf.int[1],
            ci_high = cor.test(ctmax, collection_temp)$conf.int[2]) %>% 
  mutate(sig = ifelse(p.value <0.05, "Sig.", "Non Sig.")) %>% 
  mutate(duration = 0,
         parameter = "coll_temp")

corr_vals = corr_vals %>%  
  mutate(duration = as.numeric(duration)) %>% 
  bind_rows(coll_corr)
corr_vals %>% 
  mutate(parameter = fct_relevel(parameter, c("min", "max", "range",
                                              "mean", "med", "var",
                                              "mean_min", "mean_max", "mean_range"))) %>% 
  ggplot(aes(x = duration, y = correlation, colour = sp_name)) + 
  facet_wrap(.~parameter) + 
  geom_hline(yintercept = 0) + 
  geom_point(size = 0.9) + 
  geom_line(linewidth = 1.5) + 
  scale_colour_manual(values = species_cols) + 
  labs(x = "Duration (days)",
       y = "Correlation", 
       colour = "Species") + 
  theme_matt_facets()

Shown here are the top three factors for each species.

# 
# corr_vals = full_data %>%
#   filter(sp_name %in% num_colls$sp_name) %>% 
#   filter(sex == "female") %>% 
#   mutate(collection_date = as.Date(collection_date)) %>% 
#   full_join(temp_predictors, join_by(collection_date == date)) %>% 
#   pivot_longer(cols = c(collection_temp, mean_temp:tail(names(.), 1)),
#                values_to = "value", 
#                names_to = "predictor") %>%  
#   group_by(sp_name, predictor) %>% 
#   summarise(correlation = cor.test(ctmax, value)$estimate,
#             p.value = cor.test(ctmax, value)$p.value,
#             ci_low = cor.test(ctmax, value)$conf.int[1],
#             ci_high = cor.test(ctmax, value)$conf.int[2]) %>% 
#   mutate(sig = ifelse(p.value <0.05, "Sig.", "Non Sig."))

corr_vals %>%  
  filter(sig == "Sig.") %>% 
  drop_na(correlation) %>% 
  group_by(sp_name) %>%
  arrange(desc(correlation)) %>% 
  slice_head(n = 3) %>% 
  select("Species" = sp_name, "Predictor" = parameter, "Duration" = duration, "Correlation" = correlation, "P-Value" = p.value) %>% 
  knitr::kable(align = "c")
Species Predictor Duration Correlation P-Value
Epischura lacustris max 20 0.8926416 0.0000000
Epischura lacustris max 19 0.8906963 0.0000000
Epischura lacustris max 21 0.8874924 0.0000000
Leptodiaptomus minutus max 6 0.7904546 0.0000000
Leptodiaptomus minutus max 7 0.7902546 0.0000000
Leptodiaptomus minutus max 8 0.7902100 0.0000000
Leptodiaptomus sicilis range 23 0.3035589 0.0000000
Leptodiaptomus sicilis var 21 0.3031145 0.0000000
Leptodiaptomus sicilis range 24 0.3019967 0.0000000
Limnocalanus macrurus max 7 0.5521216 0.0001239
Limnocalanus macrurus max 8 0.5520367 0.0001242
Limnocalanus macrurus mean_min 6 0.5512902 0.0001274
Senecella calanoides var 7 0.4342229 0.0492015
Skistodiaptomus oregonensis max 2 0.8019320 0.0000000
Skistodiaptomus oregonensis mean_max 2 0.7970519 0.0000000
Skistodiaptomus oregonensis max 1 0.7965109 0.0000000

Phenotypic variation (like acclimation of thermal limits) is a physiological process. depending on the mechanistic underpinnings (changes in HSP expression, etc.), the amount of time it takes for an individual to acclimate may vary based on body size (larger species, more cells, more time required to acclimate). Shown here is the duration of the environmental acclimation window the copepods appear to be responding to.

mean_sizes = full_data %>% 
  filter(sex == "female") %>% 
  group_by(sp_name) %>%  
  summarise(mean_size = mean(size, na.rm = T))

corr_vals %>% 
  group_by(sp_name) %>% 
  filter(correlation == max(correlation)) %>%  
  inner_join(mean_sizes, by = "sp_name") %>% 
  select(sp_name, duration, mean_size) %>%  
  ggplot(aes(x = mean_size, y = duration)) + 
  geom_point(aes(colour = sp_name), 
             size = 4) + 
  scale_colour_manual(values = species_cols) + 
  labs(x = "Mean Female Size (mm)",
       y = "Acclimation Duration",
       colour = "Species") + 
  theme_matt() + 
  theme(legend.position = "right")

Trait Variation

# ctmax_plot = full_data %>%
#   mutate( #sp_name = str_replace(sp_name, pattern = " ",
#     #                              replacement = "\n"),
#     sp_name = fct_reorder(sp_name, ctmax, mean)) %>%
#   ggplot(aes(y = sp_name, x = ctmax)) +
#   geom_point(aes(colour= sp_name_sub),
#              position = position_dodge(width = 0.3),
#              size = 4) +
#   scale_colour_manual(values = species_cols) +
#   xlab(NULL) +
#   labs(y = "",
#        x = "CTmax (°C)",
#        colour = "Group") +
#   theme_matt() +
#   theme(legend.position = "none")
# 
# size_plot = full_data %>%
#   mutate(sp_name = fct_reorder(sp_name, ctmax, mean)) %>%
#   ggplot(aes(y = sp_name, x = size)) +
#   geom_point(aes(colour= sp_name_sub),
#              position = position_dodge(width = 0.3),
#              size = 4) +
#   scale_colour_manual(values = species_cols) +
#   labs(x = "Prosome Length (mm)",
#        y = "",
#        colour = "Group") +
#   guides(color = guide_legend(ncol = 1)) +
#   theme_matt(base_size = ) +
#   theme(legend.position = "right",
#         axis.text.y = element_blank(),
#         plot.margin = margin(0, 0, 0, 0,"cm"))
# 
# trait_plot = ctmax_plot + size_plot
# trait_plot

Shown below are the clutch size distributions for the three diaptomiid species, which produce egg sacs that allow for easy quantification of fecundity.

full_data %>%  
  drop_na(fecundity) %>%  
  ggplot(aes(x = fecundity, fill = sp_name_sub)) + 
  facet_wrap(.~sp_name_sub, ncol = 1) + 
  geom_histogram(binwidth = 2) + 
  scale_fill_manual(values = species_cols) + 
  labs(x = "Fecundity (# Eggs)") +
  theme_matt_facets() + 
  theme(legend.position = "none")

One of the main aims of this project is to examine the patterns and processes driving variation in upper thermal limits across these species of copepods.

Variation with temperature

We expect one of the primary drivers of copepod thermal limits to be temperature. The correlation analysis has shown that the copepods are generally (although not always) responding to the recent thermal environment. Shown below are thermal limits, body size, and fecundity values plotted against the temperature at the time of collection. Also shown is warming tolerance, calculated as the difference between upper thermal limit and the collection temperature.

We generally see an increase in thermal limits with increasing collection temperature, a slight decrease in body size, and variable relationships between temperature and fecundity. All species maintained some degree of buffer between environmental temperatures and upper thermal limits, but Epischura and L. minutus approached their upper thermal limits during the warmest collections during the summer.

ctmax_temp = ggplot(full_data, aes(x = collection_temp, y = ctmax, colour = sp_name)) + 
  geom_smooth(method = "lm", linewidth = 3) +
  geom_point(size = 3) + 
  labs(x = "Collection Temperature (°C)", 
       y = "CTmax (°C)",
       colour = "Species") + 
  scale_colour_manual(values = species_cols) + 
  theme_matt() + 
  theme(legend.position = "right")

size_temp = ggplot(filter(full_data, sex != "juvenile"), aes(x = collection_temp, y = size, colour = sp_name)) + 
  geom_smooth(method = "lm", linewidth = 3) +
  geom_point(size = 3) + 
  labs(x = "Collection Temperature (°C)", 
       y = "Length (mm)",
       colour = "Species")  + 
  scale_colour_manual(values = species_cols) + 
  theme_matt() + 
  theme(legend.position = "right")

wt_temp = ggplot(full_data, aes(x = collection_temp, y = warming_tol, colour = sp_name)) + 
  geom_smooth(method = "lm", linewidth = 3) +
  geom_point(size = 3) + 
  labs(x = "Collection Temperature (°C)", 
       y = "Warming Tolerance (°C)",
       colour = "Species")  + 
  scale_colour_manual(values = species_cols) + 
  theme_matt() + 
  theme(legend.position = "right")

eggs_temp = ggplot(full_data, aes(x = collection_temp, y = fecundity, colour = sp_name)) + 
  geom_smooth(method = "lm", linewidth = 3) +
  geom_point(size = 3) + 
  labs(x = "Collection Temperature (°C)", 
       y = "Fecundity (# Eggs)",
       colour = "Species")  + 
  scale_colour_manual(values = species_cols) + 
  theme_matt() + 
  theme(legend.position = "right")

ggarrange(ctmax_temp, size_temp, wt_temp, eggs_temp, 
          common.legend = T, legend = "right")

full_data %>% 
  #filter(sex == "female") %>%  
  group_by(sp_name) %>% filter(n() > 5) %>% filter(!str_detect(sp_name, pattern = "kindti")) %>% 
  ggplot(aes(x = collection_temp, y = ctmax, colour = sp_name)) + 
  facet_wrap(sp_name~.) + 
  geom_point(size = 2, alpha = 0.8) + 
  geom_smooth(method = "lm", se = F, linewidth = 2) + 
  labs(x = "Collection Temp. (°C)", 
       y = "CTmax (°C)") + 
  scale_colour_manual(values = species_cols) + 
  theme_matt() + 
  theme(legend.position = "none")

Temperature dependence is relatively weak in L. sicilis, especially at cooler temperatures. We will return to this feature later in the report, but for now we will note that there are two size morphs in this species, which appear to respond differently to decreases in temperature. There are significant differences between the morphs and how temperature affects CTmax.

morph_data = full_data %>% 
  filter(sex == "female" & species == "leptodiaptomus_sicilis") %>%  mutate(sp_name = case_when(
    sp_name == "Leptodiaptomus sicilis" & size >= 0.89 ~ "Large",
    sp_name == "Leptodiaptomus sicilis" & size < 0.89 ~ "Small",
    .default = sp_name
  ))


ggplot(morph_data, aes(x = collection_temp, y = ctmax, colour = sp_name)) + 
  geom_point(size = 2, alpha = 0.8) + 
  geom_smooth(method = "lm", se = T, linewidth = 2) + 
  labs(x = "Collection Temp. (°C)", 
       y = "CTmax (°C)") + 
  theme_matt() + 
  theme(legend.position = "none")


morph.model = lm(data = morph_data, 
                 ctmax ~ collection_temp * sp_name)

knitr::kable(car::Anova(morph.model, type = "III", test = "F"))
Sum Sq Df F value Pr(>F)
(Intercept) 11838.75134 1 3930.374601 0.0000000
collection_temp 107.57172 1 35.712986 0.0000000
sp_name 32.96638 1 10.944584 0.0010357
collection_temp:sp_name 15.88294 1 5.273014 0.0222454
Residuals 1060.26547 352 NA NA

summary(morph.model)
## 
## Call:
## lm(formula = ctmax ~ collection_temp * sp_name, data = morph_data)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -7.7412 -0.7651  0.1951  1.0570  4.0070 
## 
## Coefficients:
##                              Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                  26.79205    0.42736  62.693  < 2e-16 ***
## collection_temp               0.29268    0.04897   5.976  5.6e-09 ***
## sp_nameSmall                  1.64918    0.49850   3.308  0.00104 ** 
## collection_temp:sp_nameSmall -0.15306    0.06666  -2.296  0.02225 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.736 on 352 degrees of freedom
## Multiple R-squared:  0.1139, Adjusted R-squared:  0.1064 
## F-statistic: 15.09 on 3 and 352 DF,  p-value: 2.943e-09

morph.em = emmeans::emtrends(morph.model, "sp_name", var = "collection_temp")
pairs(morph.em)
##  contrast      estimate     SE  df t.ratio p.value
##  Large - Small    0.153 0.0667 352   2.296  0.0222

Copepods spent several days in lab during experiments. Shown below are the CTmax residuals (taken from a model of CTmax against collection temperature) plotted against the time spent in lab before measurements were made. Individual regressions are shown for the residuals against days in lab for each collection. We can see clearly that thermal limits are fairly stable over time.

ggplot(ctmax_resids, aes(x = days_in_lab, y = resids, colour = sp_name, group = collection_date)) + 
  facet_wrap(sp_name~.) + 
  geom_point(size = 4, alpha = 0.5) + 
  geom_smooth(method = "lm", se = F, linewidth = 1) + 
  #scale_x_continuous(breaks = c(0:5)) + 
  labs(x = "Days in lab", 
       y = "CTmax Residuals") + 
  scale_colour_manual(values = species_cols) + 
  theme_matt_facets() + 
  theme(legend.position = "none")

full.model = lme4::lmer(data = model_data,
                        ctmax ~ sex + temp_cent + size_cent +
                          (1 + days_in_lab + temp_cent + size_cent|sp_name))

car::Anova(full.model)
## Analysis of Deviance Table (Type II Wald chisquare tests)
## 
## Response: ctmax
##             Chisq Df Pr(>Chisq)    
## sex       37.9406  2  5.772e-09 ***
## temp_cent 22.7078  1  1.886e-06 ***
## size_cent  1.2835  1     0.2573    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

fixed = fixef(full.model)

model_coefs = coefficients(full.model)$`sp_name` %>%  
  rownames_to_column(var = "species") %>% 
  separate(species, into = c("species"), sep = ":") %>% 
  select(species, "intercept" = "(Intercept)", temp_cent, size_cent, days_in_lab)

ggplot(model_coefs, aes(x = intercept, y = temp_cent)) + 
  geom_smooth(method = "lm", colour = "black") +
  geom_point(aes(colour = species),
             size = 6) + 
  scale_colour_manual(values = species_cols) + 
  labs(x = "Species Intercept", 
       y = "ARR") +
  theme_matt() + 
  theme(legend.position = "right")

The term “acclimation response ratio” is often used to describe the effect of temperature on thermal limits. The ARR is calculated as the change in thermal limits per degree change in acclimation temperature. For our data, we will estimate ARR as the slope of CTmax against collection temperature. These slopes were taken from a regression of CTmax against collection temperature and body size. Two different model types were used, a simple linear regression and a mixed effects model. The estimated ARR values were generally highly similar between the model types used.

Sex and stage variation in thermal limits

Previous sections have generally lumped juvenile, female, and male individuals together. There may be important stage- or sex-specific differences in CTmax though. For several species, we have measurements for individuals in different stages or of different sexes.

sex_sample_sizes = ctmax_resids %>%  
  group_by(sp_name, sex) %>%  
  summarise(num = n()) %>%  
  pivot_wider(id_cols = sp_name,
              names_from = sex, 
              values_from = num,
              values_fill = 0) %>% 
  select("Species" = sp_name, "Juvenile" = juvenile, "Female" = female, "Male" = male)

knitr::kable(sex_sample_sizes, align = "c")
Species Juvenile Female Male
Epischura lacustris 31 45 19
Leptodiaptomus minutus 12 271 38
Leptodiaptomus sicilis 31 356 95
Limnocalanus macrurus 4 43 39
Osphranticum labronectum 0 1 0
Senecella calanoides 13 21 8
Skistodiaptomus oregonensis 14 211 28

The female-male and female-juvenile comparisons show that there are generally no differences in thermal limits between these groups.

ctmax_resids %>% 
  filter(sp_name %in% filter(sex_sample_sizes, Male > 0, Female > 0)$Species & 
           sex != "juvenile") %>% 
  ggplot(aes(x = sex, y = resids, colour = sp_name, group = sp_name)) + 
  facet_wrap(sp_name~., ncol = 2) + 
  geom_smooth(method = "lm", se = F, linewidth = 1) + 
  geom_point(size = 3,
             alpha = 0.5,
             position = position_jitter(height = 0, width = 0.05)) +  
  labs(x = "Sex", 
       y = "CTmax Residuals") + 
  scale_colour_manual(values = species_cols) + 
  theme_bw(base_size = 18) + 
  theme(legend.position = "none", 
        panel.grid = element_blank())

ctmax_resids %>% 
  filter(sp_name %in% filter(sex_sample_sizes, Juvenile > 0 & Female > 0)$Species & 
           sex != "male") %>% 
  ggplot(aes(x = sex, y = resids, colour = sp_name, group = sp_name)) + 
  facet_wrap(sp_name~., ncol = 2) + 
  geom_smooth(method = "lm", se = F, linewidth = 1) + 
  geom_point(size = 3,
             alpha = 0.5,
             position = position_jitter(height = 0, width = 0.05)) +  
  labs(x = "Sex", 
       y = "CTmax (°C)") + 
  scale_colour_manual(values = species_cols) + 
  theme_bw(base_size = 18) + 
  theme(legend.position = "none", 
        panel.grid = element_blank())

Trait Correlations and Trade-offs

A relationship between size and upper thermal limits has been suggested in a wide range of other taxa. Shown below are the measured upper thermal limits plotted against prosome length. The overall relationship (inclusive of all species) is shown as the black line in the background. Regressions for each individual species are also shown. Across the entire assemblage, there is a strong decrease in thermal limits with increasing size.


full_data %>% 
  #filter(sex == "female") %>%  
  ggplot( aes(x = size, y = ctmax, colour = sp_name)) + 
  geom_smooth(data = full_data, 
              aes(x = size, y = ctmax),
              method = "lm", 
              colour ="black", 
              linewidth = 2.5) + 
  geom_point(size = 2, alpha = 0.3) + 
  geom_smooth(method = "lm", se = F, linewidth = 2) + 
  labs(x = "Length (mm)", 
       y = "CTmax (°C)",
       colour = "Species") + 
  scale_colour_manual(values = species_cols) + 
  theme_matt() + 
  theme(legend.position = "right")

Shown here is the relationship for each species individually.

full_data %>% 
  #filter(sex == "female") %>%  
  group_by(sp_name) %>% filter(n() >2) %>% filter(!str_detect(sp_name, pattern = "kindti")) %>% 
  ggplot( aes(x = size, y = ctmax, colour = sp_name)) + 
  facet_wrap(sp_name~., scales = "free", nrow = 2) + 
  geom_point(size = 2, alpha = 0.8) + 
  geom_smooth(method = "lm", se = F, linewidth = 2) + 
  labs(x = "Length (mm)", 
       y = "CTmax (°C)",
       colour = "Species") + 
  scale_colour_manual(values = species_cols) + 
  theme_matt() + 
  theme(legend.position = "none")

Shown below is the relationship between mean size and mean thermal limits for females of each species. We see that larger species within the community tend to have a lower thermal limit than smaller species.

full_data %>% 
  group_by(sp_name, sex) %>% 
  summarize(mean_ctmax = mean(ctmax, na.rm = T),
            mean_size = mean(size, na.rm = T)) %>% 
  #filter(sex == "female") %>% 
  ggplot(aes(x = mean_size, y = mean_ctmax)) + 
  geom_smooth(method = "lm", se = F, linewidth = 2, colour = "black") + 
  geom_point(aes(colour = sp_name, shape = sex),
             size = 5) + 
  labs(x = "Length (mm)", 
       y = "CTmax (°C)",
       colour = "Species") + 
  scale_colour_manual(values = species_cols) + 
  theme_matt() + 
  theme(legend.position = "right")

Shown here is the relationship between fecundity and size, showing the classic pattern of increasing egg production with increasing size.

ctmax_resids %>%  
  drop_na(fecundity) %>% 
  ggplot(aes(x = size, y = fecundity, colour = sp_name)) + 
  geom_smooth(method = "lm", se = F, linewidth = 2) + 
  geom_point(size = 2, alpha = 0.5) + 
  labs(x = "Prosome length (mm)", 
       y = "Fecundity (# Eggs)",
       colour = "Species") + 
  scale_colour_manual(values = species_cols) + 
  theme_matt() + 
  theme(legend.position = "right")

Individuals may also allocate energy to different fitness related traits, prioritizing reproductive output over environmental tolerance, for example. Shown below is the relationship between CTmax residuals (again, controlling for the effects of collection temperature) against fecundity. We can see clearly that individuals with increased fecundity are not decreasing thermal limits, suggesting that there is no energetic trade-off between these traits.

ctmax_resids %>%  
  drop_na(fecundity) %>% 
  ggplot(aes(x = ctmax, y = fecundity, colour = sp_name)) + 
  geom_smooth(method = "lm", se = F, linewidth = 2) + 
  geom_point(size = 2, alpha = 0.5) + 
  labs(x = "CTmax Residuals", 
       y = "Fecundity (# Eggs)") + 
  scale_colour_manual(values = species_cols) + 
  theme_matt() + 
  theme(legend.position = "right")


fitness.model = lm(data = ctmax_resids, 
                   fecundity ~ resids * sp_name)

car::Anova(fitness.model)
## Anova Table (Type II tests)
## 
## Response: fecundity
##                Sum Sq  Df  F value    Pr(>F)    
## resids            0.4   1   0.0247  0.875248    
## sp_name        8543.4   2 272.3662 < 2.2e-16 ***
## resids:sp_name  164.1   2   5.2308  0.005773 ** 
## Residuals      5520.6 352                       
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

emmeans::emtrends(fitness.model,  var = "resids","sp_name")
##  sp_name                     resids.trend    SE  df lower.CL upper.CL
##  Leptodiaptomus minutus            0.4081 0.267 352   -0.118    0.934
##  Leptodiaptomus sicilis            0.0846 0.206 352   -0.320    0.489
##  Skistodiaptomus oregonensis      -0.9084 0.321 352   -1.541   -0.276
## 
## Confidence level used: 0.95

Other patterns in variation

Leptodiaptomus sicilis is the most abundant species during the winter. There was a large shift in the size of mature females towards the end of December. These large and small individuals are the same species (confirmed via COI sequencing), suggesting this shift may reflect a transition from one generation to another and that, unlike in many other lakes, there are two generations of L. sicilis per year in Lake Champlain. This size difference may be caused by differences in the developmental environments. For example, individuals developing in January grow up at very low temperatures, and therefore may reach larger sizes. These individuals oversummer in deep waters, then re-emerge in October and produce a new generation. Water temperatures are still fairly high through November, which results in a generation of smaller individuals, which mature in time to produce a new generation in January.

Shown below is the distribution of pairwise distances between COI sequences of large and small morphs. Distances in both within- and across-morph comparisons are small.

ind_dist = ape::dist.dna(sic_dnabin, model = "raw") %>% as.matrix %>% 
  as_tibble() %>%
  mutate("ind1" = colnames(.)) %>% 
  pivot_longer(-ind1, names_to = "ind2", values_to = "dist") %>%
  mutate(ind1 = factor(ind1),
         ind2 = factor(ind2)) %>% 
  filter(!(ind1 == "sore1" | ind2 == "sore1")) %>% 
  mutate(
    ind1 = case_when(
      ind1 == "S1" ~ "small1",
      ind1 == "S3" ~ "small3",
      ind1 == "lsic3" ~ "small4",
      ind1 == "lsic5" ~ "small6",
      ind1 == "lsic9" ~ "small8",
      ind1 == "lsic10" ~ "small9",
      ind1 == "lsic11" ~ "small10",
      ind1 == "L1" ~ "large1",
      ind1 == "L2" ~ "large2",
      ind1 == "L3" ~ "large3",
      ind1 == "lsic1" ~ "large4",
      ind1 == "lsic2" ~ "large5",
      ind1 == "lsic7" ~ "large6",
      ind1 == "lsic8" ~ "large7"),
    ind2 = case_when(
      ind2 == "S1" ~ "small1",
      ind2 == "S3" ~ "small3",
      ind2 == "lsic3" ~ "small4",
      ind2 == "lsic5" ~ "small6",
      ind2 == "lsic9" ~ "small8",
      ind2 == "lsic10" ~ "small9",
      ind2 == "lsic11" ~ "small10",
      ind2 == "L1" ~ "large1",
      ind2 == "L2" ~ "large2",
      ind2 == "L3" ~ "large3",
      ind2 == "lsic1" ~ "large4",
      ind2 == "lsic2" ~ "large5",
      ind2 == "lsic7" ~ "large6",
      ind2 == "lsic8" ~ "large7"),
    'comparison' = case_when(
      str_detect(ind1, pattern = "large") & str_detect(ind2, pattern = "large") ~ "within",
      str_detect(ind1, pattern = "small") & str_detect(ind2, pattern = "small") ~ "within", 
      str_detect(ind1, pattern = "large") & str_detect(ind2, pattern = "small") ~ "across",
      str_detect(ind1, pattern = "small") & str_detect(ind2, pattern = "large") ~ "across"
    )) 

ggplot(ind_dist, aes(dist, fill = comparison)) +
  geom_histogram(binwidth = 0.005) + 
  labs(x = "Distance") + 
  theme_matt()

full_data %>%  
  filter(sp_name == "Leptodiaptomus sicilis") %>% 
  filter(sex != "juvenile") %>% 
  group_by(collection_date) %>% 
  mutate(size_center = scale(size, center = T, scale = F)) %>% 
  ggplot(aes(y = factor(collection_date), x = size, fill = collection_temp)) + 
  facet_wrap(sex~.) + 
  geom_density_ridges(bandwidth = 0.04) + 
  geom_vline(xintercept = 0.89) + 
  labs(x = "Size (mm)",
       y = "Date", 
       fill = "Coll. Temp. (°C)") + 
  theme_matt() + 
  theme(legend.position = "right",
        axis.text.y = element_text(size = 12))

full_data %>%  
  filter(sp_name == "Leptodiaptomus minutus") %>% 
  filter(sex != "juvenile") %>% 
  ggplot(aes(y = factor(collection_date), x = size, fill = collection_temp)) + 
  facet_wrap(sex~.) + 
  geom_density_ridges(bandwidth = 0.04) + 
  geom_vline(xintercept = 0.69) + 
  labs(x = "Size (mm)",
       y = "Date", 
       fill = "Coll. Temp. (°C)") + 
  coord_cartesian(xlim = c(0.5,0.9)) + 
  theme_matt() + 
  theme(legend.position = "right",
        axis.text.y = element_text(size = 12))

Distribution Lag Non-Linear Model (DLNM approach)

dlnm_data = full_data %>%  
  filter(sex == "female") %>% 
  select(collection_date, days_in_lab, collection_temp, replicate, sp_name, size, fecundity, ctmax) %>% 
  group_by(collection_date, collection_temp, sp_name) %>%  
  summarise(mean_ctmax = mean(ctmax, na.rm = T),
            mean_size = mean(size, na.rm = T),
            sample = n())
hourly_temps = raw_temps %>%  
  mutate(hour = lubridate::hour(dateTime)) %>%  
  group_by(date, hour) %>%  
  summarise(mean_temp = mean(degC)) %>% 
  ungroup() %>% 
  complete(date, nesting(hour)) %>%  
  mutate(timestep = ymd_hms(
    paste(lubridate::as_date(date), 
          paste0(hour, ":00:00"), sep = " ")),
    observation = row_number()) 
if(predict_vuln == F){
  knitr::knit_exit()
}
LS0tCnRpdGxlOiBTZWFzb25hbGl0eSBpbiBMYWtlIENoYW1wbGFpbiBDb3BlcG9kIFRoZXJtYWwgTGltaXRzCmRhdGU6ICJgciBTeXMuRGF0ZSgpYCIKb3V0cHV0OiAKICBodG1sX2RvY3VtZW50OgogICAgICAgICAgY29kZV9mb2xkaW5nOiBoaWRlCiAgICAgICAgICBjb2RlX2Rvd25sb2FkOiB0cnVlCiAgICAgICAgICB0b2M6IHRydWUKICAgICAgICAgIHRvY19mbG9hdDogdHJ1ZQogIGdpdGh1Yl9kb2N1bWVudDoKICAgICAgICAgIGh0bWxfcHJldmlldzogZmFsc2UKICAgICAgICAgIHRvYzogdHJ1ZQogICAgICAgICAgdG9jX2RlcHRoOiAzCi0tLQoKYGBge3Igc2V0dXAsIGluY2x1ZGU9VCwgbWVzc2FnZSA9IEYsIHdhcm5pbmcgPSBGLCBlY2hvID0gRn0Ka25pdHI6Om9wdHNfY2h1bmskc2V0KAogIGVjaG8gPSBrbml0cjo6aXNfaHRtbF9vdXRwdXQoKSwKICBmaWcuYWxpZ24gPSAiY2VudGVyIiwKICBmaWcucGF0aCA9ICIuLi9GaWd1cmVzL21hcmtkb3duLyIsCiAgZGV2ID0gYygicG5nIiwgInBkZiIpLAogIG1lc3NhZ2UgPSBGQUxTRSwKICB3YXJuaW5nID0gRkFMU0UsCiAgY29sbGFwc2UgPSBUCikKCnRoZW1lX21hdHQgPSBmdW5jdGlvbihiYXNlX3NpemUgPSAxOCwKICAgICAgICAgICAgICAgICAgICAgIGRhcmtfdGV4dCA9ICJncmV5MjAiKXsKICBtaWRfdGV4dCA8LSAgbW9ub2Nocm9tZVI6OmdlbmVyYXRlX3BhbGV0dGUoZGFya190ZXh0LCAiZ29fbGlnaHRlciIsIG5fY29sb3VycyA9IDUpWzJdCiAgbGlnaHRfdGV4dCA8LSAgbW9ub2Nocm9tZVI6OmdlbmVyYXRlX3BhbGV0dGUoZGFya190ZXh0LCAiZ29fbGlnaHRlciIsIG5fY29sb3VycyA9IDUpWzNdCiAgCiAgZ2dwdWJyOjp0aGVtZV9wdWJyKGJhc2VfZmFtaWx5PSJzYW5zIikgJStyZXBsYWNlJSAKICAgIHRoZW1lKAogICAgICBwYW5lbC5iYWNrZ3JvdW5kICA9IGVsZW1lbnRfcmVjdChmaWxsPSJ0cmFuc3BhcmVudCIsIGNvbG91cj1OQSksIAogICAgICBwbG90LmJhY2tncm91bmQgPSBlbGVtZW50X3JlY3QoZmlsbD0idHJhbnNwYXJlbnQiLCBjb2xvdXI9TkEpLCAKICAgICAgbGVnZW5kLmJhY2tncm91bmQgPSBlbGVtZW50X3JlY3QoZmlsbD0idHJhbnNwYXJlbnQiLCBjb2xvdXI9TkEpLAogICAgICBsZWdlbmQua2V5ID0gZWxlbWVudF9yZWN0KGZpbGw9InRyYW5zcGFyZW50IiwgY29sb3VyPU5BKSwKICAgICAgdGV4dCA9IGVsZW1lbnRfdGV4dChjb2xvdXIgPSBtaWRfdGV4dCwgbGluZWhlaWdodCA9IDEuMSksCiAgICAgIHRpdGxlID0gZWxlbWVudF90ZXh0KHNpemUgPSBiYXNlX3NpemUgKiAxLjUsCiAgICAgICAgICAgICAgICAgICAgICAgICAgIGNvbG91ciA9IGRhcmtfdGV4dCksCiAgICAgIGF4aXMudGV4dCA9IGVsZW1lbnRfdGV4dChzaXplID0gYmFzZV9zaXplLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgY29sb3VyID0gbWlkX3RleHQpLAogICAgICBheGlzLnRpdGxlLnggPSBlbGVtZW50X3RleHQoc2l6ZSA9IGJhc2Vfc2l6ZSAqIDEuMiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG1hcmdpbiA9IHVuaXQoYygzLCAwLCAwLCAwKSwgIm1tIikpLAogICAgICBheGlzLnRpdGxlLnkgPSBlbGVtZW50X3RleHQoc2l6ZSA9IGJhc2Vfc2l6ZSAqIDEuMiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG1hcmdpbiA9IHVuaXQoYygwLCA1LCAwLCAwKSwgIm1tIiksIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgYW5nbGUgPSA5MCksCiAgICAgIGxlZ2VuZC50ZXh0ID0gZWxlbWVudF90ZXh0KHNpemU9YmFzZV9zaXplICogMC45KSwKICAgICAgbGVnZW5kLnRpdGxlID0gZWxlbWVudF90ZXh0KHNpemUgPSBiYXNlX3NpemUgKiAwLjksIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZmFjZSA9ICJib2xkIiksCiAgICAgIHBsb3QubWFyZ2luID0gbWFyZ2luKDAuMjUsIDAuMjUsIDAuMjUsIDAuMjUsImNtIikKICAgICkKfQoKdGhlbWVfbWF0dF9mYWNldHMgPSBmdW5jdGlvbihiYXNlX3NpemUgPSAxOCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkYXJrX3RleHQgPSAiZ3JleTIwIil7CiAgbWlkX3RleHQgPC0gIG1vbm9jaHJvbWVSOjpnZW5lcmF0ZV9wYWxldHRlKGRhcmtfdGV4dCwgImdvX2xpZ2h0ZXIiLCBuX2NvbG91cnMgPSA1KVsyXQogIGxpZ2h0X3RleHQgPC0gIG1vbm9jaHJvbWVSOjpnZW5lcmF0ZV9wYWxldHRlKGRhcmtfdGV4dCwgImdvX2xpZ2h0ZXIiLCBuX2NvbG91cnMgPSA1KVszXQogIAogIHRoZW1lX2J3KGJhc2VfZmFtaWx5PSJzYW5zIikgJStyZXBsYWNlJSAKICAgIHRoZW1lKAogICAgICBwYW5lbC5ncmlkID0gZWxlbWVudF9ibGFuaygpLAogICAgICBwYW5lbC5iYWNrZ3JvdW5kICA9IGVsZW1lbnRfcmVjdChmaWxsPSJ0cmFuc3BhcmVudCIsIGNvbG91cj1OQSksIAogICAgICBwbG90LmJhY2tncm91bmQgPSBlbGVtZW50X3JlY3QoZmlsbD0idHJhbnNwYXJlbnQiLCBjb2xvdXI9TkEpLCAKICAgICAgbGVnZW5kLmJhY2tncm91bmQgPSBlbGVtZW50X3JlY3QoZmlsbD0idHJhbnNwYXJlbnQiLCBjb2xvdXI9TkEpLAogICAgICBsZWdlbmQua2V5ID0gZWxlbWVudF9yZWN0KGZpbGw9InRyYW5zcGFyZW50IiwgY29sb3VyPU5BKSwKICAgICAgdGV4dCA9IGVsZW1lbnRfdGV4dChjb2xvdXIgPSBtaWRfdGV4dCwgbGluZWhlaWdodCA9IDEuMSksCiAgICAgIHN0cmlwLnRleHQueCA9IGVsZW1lbnRfdGV4dChzaXplID0gYmFzZV9zaXplKSwKICAgICAgdGl0bGUgPSBlbGVtZW50X3RleHQoc2l6ZSA9IGJhc2Vfc2l6ZSAqIDEuNSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgY29sb3VyID0gZGFya190ZXh0KSwKICAgICAgYXhpcy50ZXh0ID0gZWxlbWVudF90ZXh0KHNpemUgPSBiYXNlX3NpemUsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBjb2xvdXIgPSBtaWRfdGV4dCksCiAgICAgIGF4aXMudGl0bGUueCA9IGVsZW1lbnRfdGV4dChzaXplID0gYmFzZV9zaXplICogMS4yLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbWFyZ2luID0gdW5pdChjKDMsIDAsIDAsIDApLCAibW0iKSksCiAgICAgIGF4aXMudGl0bGUueSA9IGVsZW1lbnRfdGV4dChzaXplID0gYmFzZV9zaXplICogMS4yLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbWFyZ2luID0gdW5pdChjKDAsIDUsIDAsIDApLCAibW0iKSwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBhbmdsZSA9IDkwKSwKICAgICAgbGVnZW5kLnRleHQgPSBlbGVtZW50X3RleHQoc2l6ZT1iYXNlX3NpemUgKiAwLjkpLAogICAgICBsZWdlbmQudGl0bGUgPSBlbGVtZW50X3RleHQoc2l6ZSA9IGJhc2Vfc2l6ZSAqIDAuOSwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBmYWNlID0gImJvbGQiKSwKICAgICAgcGxvdC5tYXJnaW4gPSBtYXJnaW4oMC4yNSwgMC4yNSwgMC4yNSwgMC4yNSwiY20iKQogICAgKQp9CgpzcGVjaWVzX2NvbHMgPSBjKCJMZXB0b2RpYXB0b211cyBtaW51dHVzIiA9ICIjZmZkMDI5IiwKICAgICAgICAgICAgICAgICAiTGVwdG9kaWFwdG9tdXMgbWludXR1cyBqdXZlbmlsZSIgPSAiI2UzZDhhZiIsCiAgICAgICAgICAgICAgICAgIkxlcHRvZGlhcHRvbXVzIG1pbnV0dXMgbWFsZSIgPSAiI2ZmZTg5NiIsCiAgICAgICAgICAgICAgICAgIkxlcHRvZGlhcHRvbXVzIHNpY2lsaXMiID0gIiNEODZGMjkiLAogICAgICAgICAgICAgICAgICJMZXB0b2RpYXB0b211cyBzaWNpbGlzIG1hbGUiID0gIiNFMjhDMDAiLAogICAgICAgICAgICAgICAgICJTa2lzdG9kaWFwdG9tdXMgb3JlZ29uZW5zaXMiID0gIiNDNUMzNUEiLAogICAgICAgICAgICAgICAgICJTa2lzdG9kaWFwdG9tdXMgb3JlZ29uZW5zaXMgbWFsZSIgPSAiI2U2ZTZhYSIsIAogICAgICAgICAgICAgICAgICJFcGlzY2h1cmEgbGFjdXN0cmlzIGp1dmVuaWxlIiA9ICJwbHVtMSIsIAogICAgICAgICAgICAgICAgICJFcGlzY2h1cmEgbGFjdXN0cmlzIG1hbGUiID0gInBsdW0zIiwgCiAgICAgICAgICAgICAgICAgIkVwaXNjaHVyYSBsYWN1c3RyaXMiID0gInBsdW00IiwgCiAgICAgICAgICAgICAgICAgIkxpbW5vY2FsYW51cyBtYWNydXJ1cyIgPSAic2t5Ymx1ZTQiLCAKICAgICAgICAgICAgICAgICAiTGltbm9jYWxhbnVzIG1hY3J1cnVzIG1hbGUiID0gInNreWJsdWUzIiwgCiAgICAgICAgICAgICAgICAgIkxpbW5vY2FsYW51cyBtYWNydXJ1cyBqdXZlbmlsZSIgPSAic2t5Ymx1ZSIsIAogICAgICAgICAgICAgICAgICJTZW5lY2VsbGEgY2FsYW5vaWRlcyIgPSAiZGFya3NlYWdyZWVuMyIsCiAgICAgICAgICAgICAgICAgIkxlcHRvZG9yYSBraW5kdGkgbWFsZSIgPSAibGlnaHRibHVlMyIsCiAgICAgICAgICAgICAgICAgIkxlcHRvZG9yYSBraW5kdGkiID0gImxpZ2h0Ymx1ZTQiLAogICAgICAgICAgICAgICAgICJMZXB0b2RvcmEga2luZHRpIGp1dmVuaWxlIiA9ICJsaWdodGJsdWUiLAogICAgICAgICAgICAgICAgICJPc3BocmFudGljdW0gbGFicm9uZWN0dW0iID0gImxpZ2h0Y29yYWwiKQpgYGAKCiMjIENvcGVwb2QgQ29sbGVjdGlvbgoKQ29wZXBvZHMgd2VyZSBjb2xsZWN0ZWQgYXQgYXBwcm94aW1hdGVseSB3ZWVrbHkgaW50ZXJ2YWxzIGZyb20gTGFrZSBDaGFtcGxhaW4gKEJ1cmxpbmd0b24gRmlzaGluZyBQaWVyKS4gUGxhbmt0b24gd2FzIGNvbGxlY3RlZCBmcm9tIHRoZSB0b3AgMyBtZXRlcnMgdXNpbmcgYSAyNTAgdW0gbWVzaCBuZXQuIAoKYGBge3J9CiMgTGFrZSBDaGFtcGxhaW4gbmVhciBCdXJsaW5ndG9uLCBWVApzaXRlTnVtYmVyID0gIjA0Mjk0NTAwIgpDaGFtcGxhaW5JbmZvID0gcmVhZE5XSVNzaXRlKHNpdGVOdW1iZXIpCnBhcmFtZXRlckNkID0gIjAwMDEwIgpzdGFydERhdGUgPSAiMjAyMy0wMS0wMSIKZW5kRGF0ZSA9ICIiCiNzdGF0Q2QgPSBjKCIwMDAwMSIsICIwMDAwMiIsIjAwMDAzIiwgIjAwMDExIikgIyAxIC0gbWF4LCAyIC0gbWluLCAzID0gbWVhbgoKIyBDb25zdHJ1Y3RzIHRoZSBVUkwgZm9yIHRoZSBkYXRhIHdhbnRlZCB0aGVuIGRvd25sb2FkcyB0aGUgZGF0YQp1cmwgPSBjb25zdHJ1Y3ROV0lTVVJMKHNpdGVOdW1iZXJzID0gc2l0ZU51bWJlciwgcGFyYW1ldGVyQ2QgPSBwYXJhbWV0ZXJDZCwgCiAgICAgICAgICAgICAgICAgICAgICAgc3RhcnREYXRlID0gc3RhcnREYXRlLCBlbmREYXRlID0gZW5kRGF0ZSwgc2VydmljZSA9ICJ1diIpCgpyYXdfdGVtcHMgPSBpbXBvcnRXYXRlck1MMSh1cmwsIGFzRGF0ZVRpbWUgPSBUKSAlPiUgCiAgbXV0YXRlKCJkYXRlIiA9IGFzLkRhdGUoZGF0ZVRpbWUpKSAlPiUgCiAgc2VsZWN0KGRhdGVUaW1lLCB0el9jZCwgZGF0ZSwgZGVnQyA9IFhfMDAwMTBfMDAwMDApCgp0ZW1wX2RhdGEgPSAgcmF3X3RlbXBzICU+JSAKICBzZWxlY3QoZGF0ZSwgInRlbXAiID0gZGVnQykKYGBgCgpDb2xsZWN0aW9ucyBiZWdhbiBpbiBsYXRlIE1heSAyMDIzLiBTZXZlcmFsIGdhcHMgYXJlIHByZXNlbnQsIGJ1dCBjb2xsZWN0aW9ucyBoYXZlIGNvbnRpbnVlZCBhdCByb3VnaGx5IHdlZWtseSBpbnRlcnZhbHMgc2luY2UgdGhlbi4gQ29wZXBvZHMgZnJvbSBgciBsZW5ndGgodW5pcXVlKGZ1bGxfZGF0YSRjb2xsZWN0aW9uX2RhdGUpKWAgY29sbGVjdGlvbnMgd2VyZSB1c2VkIHRvIG1ha2UgYSB0b3RhbCBvZiBgciBkaW0oZnVsbF9kYXRhKVsxXWAgdGhlcm1hbCBsaW1pdCBtZWFzdXJlbWVudHMuIE92ZXIgdGhpcyB0aW1lIHBlcmlvZCwgY29sbGVjdGlvbiB0ZW1wZXJhdHVyZXMgcmFuZ2VkIGZyb20gYHIgcGFzdGUobWluKGZ1bGxfZGF0YSRjb2xsZWN0aW9uX3RlbXApLCAiIHRvICIsIG1heChmdWxsX2RhdGEkY29sbGVjdGlvbl90ZW1wKSwgc2VwID0gIiIpYMKwQy4gICAgIAoKVGhlcmUgaXMgc3Vic3RhbnRpYWwgdmFyaWF0aW9uIGluIHRoZXJtYWwgbGltaXRzIGFjcm9zcyB0aGUgc3BlY2llcyBjb2xsZWN0ZWQuIFRoZXJlIGlzIGFsc28gc29tZSBkZWdyZWUgb2YgdmFyaWF0aW9uIHdpdGhpbiB0aGUgc3BlY2llcywgd2l0aCB0aGVybWFsIGxpbWl0cyBpbmNyZWFzaW5nIHNsaWdodGx5IGR1cmluZyB0aGUgc3VtbWVyLiAgICAKCmBgYHtyIGN0bWF4LXRpbWVzZXJpZXMsIGZpZy53aWR0aD0xMCwgZmlnLmhlaWdodD01fQojIyBEYWlseSB2YWx1ZXMgZm9yIHRoZSBwZXJpb2QgZXhhbWluZWQgYnkgZGF0YXNldApjb2xsZWN0aW9uX2NvbmRpdGlvbnMgPSB0ZW1wX2RhdGEgJT4lCiAgdW5ncm91cCgpICU+JSAKICBncm91cF9ieShkYXRlKSAlPiUgCiAgc3VtbWFyaXNlKG1lYW5fdGVtcCA9IG1lYW4odGVtcCksCiAgICAgICAgICAgIG1lZF90ZW1wID0gbWVkaWFuKHRlbXApLAogICAgICAgICAgICB2YXJfdGVtcCA9IHZhcih0ZW1wKSwgCiAgICAgICAgICAgIG1pbl90ZW1wID0gbWluKHRlbXApLCAKICAgICAgICAgICAgbWF4X3RlbXAgPSBtYXgodGVtcCkpICU+JSAKICBtdXRhdGUoInJhbmdlX3RlbXAiID0gbWF4X3RlbXAgLSBtaW5fdGVtcCwKICAgICAgICAgZGF0ZSA9IGFzLkRhdGUoZGF0ZSkpICU+JSAKICB1bmdyb3VwKCkgJT4lICAKICBmaWx0ZXIoZGF0ZSA+PSAobWluKGFzLkRhdGUoZnVsbF9kYXRhJGNvbGxlY3Rpb25fZGF0ZSkpIC0gNykpICU+JSAKICBsZWZ0X2pvaW4odW5pcXVlKHNlbGVjdChmdWxsX2RhdGEsIGNvbGxlY3Rpb25fZGF0ZSwgY29sbGVjdGlvbl90ZW1wKSksIGJ5ID0gam9pbl9ieShkYXRlID09IGNvbGxlY3Rpb25fZGF0ZSkpCgojIyBNZWFuIGZlbWFsZSB0aGVybWFsIGxpbWl0cyBmb3IgZWFjaCBzcGVjaWVzLCBncm91cGVkIGJ5IGNvbGxlY3Rpb24Kc3BlY2llc19zdW1tYXJpZXMgPSBmdWxsX2RhdGEgJT4lICAKICAjZmlsdGVyKHNleCA9PSAiZmVtYWxlIikgJT4lIAogIGdyb3VwX2J5KHNwX25hbWUsIGNvbGxlY3Rpb25fZGF0ZSwgY29sbGVjdGlvbl90ZW1wKSAlPiUgIAogIHN1bW1hcmlzZSgibWVhbl9jdG1heCIgPSBtZWFuKGN0bWF4KSwKICAgICAgICAgICAgInNhbXBsZV9zaXplIiA9IG4oKSwKICAgICAgICAgICAgImN0bWF4X3N0X2VyciIgPSAoc2QoY3RtYXgpIC8gc3FydChzYW1wbGVfc2l6ZSkpLAogICAgICAgICAgICAiY3RtYXhfdmFyIiA9IHZhcihjdG1heCksIAogICAgICAgICAgICAibWVhbl9zaXplIiA9IG1lYW4oc2l6ZSksCiAgICAgICAgICAgICJzaXplX3N0X2VyciIgPSAoc2Qoc2l6ZSkgLyBzcXJ0KHNhbXBsZV9zaXplKSksCiAgICAgICAgICAgICJzaXplX3ZhciIgPSB2YXIoc2l6ZSkpICU+JSAgCiAgdW5ncm91cCgpICU+JSAKICBjb21wbGV0ZShzcF9uYW1lLCBjb2xsZWN0aW9uX2RhdGUpICU+JSAKICBhcnJhbmdlKGRlc2Moc2FtcGxlX3NpemUpKQoKYWR1bHRfc3VtbWFyaWVzID0gZnVsbF9kYXRhICU+JSAgCiAgZmlsdGVyKHNleCA9PSAiZmVtYWxlIikgJT4lIAogIGdyb3VwX2J5KHNwX25hbWUsIGNvbGxlY3Rpb25fZGF0ZSwgY29sbGVjdGlvbl90ZW1wKSAlPiUgIAogIHN1bW1hcmlzZSgibWVhbl9jdG1heCIgPSBtZWFuKGN0bWF4KSwKICAgICAgICAgICAgInNhbXBsZV9zaXplIiA9IG4oKSwKICAgICAgICAgICAgImN0bWF4X3N0X2VyciIgPSAoc2QoY3RtYXgpIC8gc3FydChzYW1wbGVfc2l6ZSkpLAogICAgICAgICAgICAiY3RtYXhfdmFyIiA9IHZhcihjdG1heCksIAogICAgICAgICAgICAibWVhbl9zaXplIiA9IG1lYW4oc2l6ZSksCiAgICAgICAgICAgICJzaXplX3N0X2VyciIgPSAoc2Qoc2l6ZSkgLyBzcXJ0KHNhbXBsZV9zaXplKSksCiAgICAgICAgICAgICJzaXplX3ZhciIgPSB2YXIoc2l6ZSkpICU+JSAgCiAgdW5ncm91cCgpICU+JSAKICBjb21wbGV0ZShzcF9uYW1lLCBjb2xsZWN0aW9uX2RhdGUpICU+JSAKICBhcnJhbmdlKGRlc2Moc2FtcGxlX3NpemUpKQoKCmdncGxvdCgpICsgCiAgZ2VvbV92bGluZShkYXRhID0gdW5pcXVlKHNlbGVjdChmdWxsX2RhdGEsIGNvbGxlY3Rpb25fZGF0ZSkpLCAKICAgICAgICAgICAgIGFlcyh4aW50ZXJjZXB0ID0gYXMuRGF0ZShjb2xsZWN0aW9uX2RhdGUpKSwKICAgICAgICAgICAgIGNvbG91ciA9ICJncmV5OTAiLAogICAgICAgICAgICAgbGluZXdpZHRoID0gMSkgKyAKICBnZW9tX2xpbmUoZGF0YSA9IGNvbGxlY3Rpb25fY29uZGl0aW9ucywgCiAgICAgICAgICAgIGFlcyh4ID0gYXMuRGF0ZShkYXRlKSwgeSA9IG1lYW5fdGVtcCksCiAgICAgICAgICAgIGNvbG91ciA9ICJibGFjayIsIAogICAgICAgICAgICBsaW5ld2lkdGggPSAyKSArIAogICMgZ2VvbV9lcnJvcmJhcihkYXRhID0gc3BlY2llc19zdW1tYXJpZXMsCiAgIyAgICAgICAgICAgICAgIGFlcyh4ID0gYXMuRGF0ZShjb2xsZWN0aW9uX2RhdGUpLAogICMgICAgICAgICAgICAgICAgICAgeW1pbiA9IG1lYW5fY3RtYXggLSBjdG1heF9zdF9lcnIsIHltYXggPSBtZWFuX2N0bWF4ICsgY3RtYXhfc3RfZXJyLAogICMgICAgICAgICAgICAgICAgICAgY29sb3VyID0gc3BfbmFtZSksCiAgIyAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAxKSwKICAjICAgICAgICAgICAgICAgd2lkdGggPSA1LCBsaW5ld2lkdGggPSAxKSArCiAgIyBnZW9tX3BvaW50KGRhdGEgPSBhZHVsdF9zdW1tYXJpZXMsIAogICMgICAgICAgICAgICBhZXMoeCA9IGFzLkRhdGUoY29sbGVjdGlvbl9kYXRlKSwgeSA9IG1lYW5fY3RtYXgsIGNvbG91ciA9IHNwX25hbWUsIHNpemUgPSBzYW1wbGVfc2l6ZSkpICsgCiAgZ2VvbV9wb2ludChkYXRhID0gZnVsbF9kYXRhLCAKICAgICAgICAgICAgIGFlcyh4ID0gYXMuRGF0ZShjb2xsZWN0aW9uX2RhdGUpLCB5ID0gY3RtYXgsIGNvbG91ciA9IHNwX25hbWUpLAogICAgICAgICAgICAgc2l6ZSA9IDIsIHBvc2l0aW9uID0gcG9zaXRpb25faml0dGVyKHdpZHRoID0gMSwgaGVpZ2h0ID0gMCkpICsgCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBzcGVjaWVzX2NvbHMpICsgCiAgbGFicyh4ID0gIkRhdGUiLCAKICAgICAgIHkgPSAiVGVtcGVyYXR1cmUgKMKwQykiLCAKICAgICAgIGNvbG91ciA9ICJTcGVjaWVzIiwKICAgICAgIHNpemUgPSAiU2FtcGxlIFNpemUiKSArIAogIHRoZW1lX21hdHQoKSArIAogIHRoZW1lKGxlZ2VuZC5wb3NpdGlvbiA9ICJyaWdodCIpCmBgYAoKYGBge3IgZmlnLndpZHRoID0gNiwgZmlnLmhlaWdodD02fQpjb2xsZWN0aW9uX2NvbmRpdGlvbnMgJT4lIAogIGRyb3BfbmEoY29sbGVjdGlvbl90ZW1wKSAlPiUgIAogIGdncGxvdChhZXMoeCA9IG1heF90ZW1wLCB5ID0gY29sbGVjdGlvbl90ZW1wKSkgKyAKICBnZW9tX2FibGluZShpbnRlcmNlcHQgPSAwLCBzbG9wZSA9IDEsCiAgICAgICAgICAgICAgbGluZXdpZHRoID0gMSwgY29sb3VyID0gImdyZXkiKSArIAogIGdlb21fcG9pbnQoc2l6ZSA9IDMpICsKICBzY2FsZV94X2NvbnRpbnVvdXMoYnJlYWtzID0gYyg1LDE1LDI1KSkgKyAKICBzY2FsZV95X2NvbnRpbnVvdXMoYnJlYWtzID0gYyg1LDE1LDI1KSkgKyAKICBsYWJzKHggPSAiTWF4LiBUZW1wLiBmcm9tIFNlbnNvciAowrBDKSIsCiAgICAgICB5ID0gIkNvbGxlY3Rpb24gVGVtcC4gKMKwQykiKSArIAogIHRoZW1lX21hdHQoKQpgYGAKCgpgYGB7ciByb3VuZC1zdW1tYXJ5LTEsIGZpZy53aWR0aD0xMSwgZmlnLmhlaWdodD0xMX0Kcm91bmRfc3VtbWFyeSA9IGZ1bGxfZGF0YSAlPiUgCiAgZ3JvdXBfYnkoY29sbGVjdGlvbl9kYXRlLCBjb2xsZWN0aW9uX3RlbXApICU+JSAKICBzdW1tYXJpc2UobWVhbl9jdG1heCA9IG1lYW4oY3RtYXgpKQoKZ2dwbG90KGRhdGEgPSByb3VuZF9zdW1tYXJ5KSArIAogIGdlb21faGxpbmUoeWludGVyY2VwdCA9IDQwKSArIAogIGdlb21fcG9pbnQoYWVzKHggPSBhc19kYXRlKGNvbGxlY3Rpb25fZGF0ZSksIHkgPSBtZWFuX2N0bWF4KSwKICAgICAgICAgICAgIGNvbG91ciA9ICJ0b21hdG8zIiwKICAgICAgICAgICAgIHNpemUgPSA1KSArCiAgZ2VvbV9iYXIoYWVzKHggPSBhc19kYXRlKGNvbGxlY3Rpb25fZGF0ZSksIHkgPSBtZWFuX2N0bWF4KSwKICAgICAgICAgICBzdGF0ID0gImlkZW50aXR5IiwKICAgICAgICAgICBmaWxsID0gIndoaXRlIiwgCiAgICAgICAgICAgY29sb3VyID0gImdyZXkzMCIpICsKICBnZW9tX2JhcihhZXMoeCA9IGFzX2RhdGUoY29sbGVjdGlvbl9kYXRlKSwgeSA9IGNvbGxlY3Rpb25fdGVtcCksCiAgICAgICAgICAgc3RhdCA9ICJpZGVudGl0eSIsCiAgICAgICAgICAgZmlsbCA9ICJkYXJrZ29sZGVucm9kMSIpICsgCiAgeWxpbSgtMywgNDApICsgCiAgY29vcmRfcG9sYXIoc3RhcnQgPSAwKSArIAogIHRoZW1lX3ZvaWQoKQpgYGAKCmBgYHtyIHJvdW5kLXN1bW1hcnktMiwgZmlnLndpZHRoPTExLCBmaWcuaGVpZ2h0PTExfQpnZ3Bsb3QoKSArIAogIGdlb21faGxpbmUoeWludGVyY2VwdCA9IAogICAgICAgICAgICAgICBjKG1heChmdWxsX2RhdGEkY29sbGVjdGlvbl90ZW1wKSwKICAgICAgICAgICAgICAgICBtaW4oZnVsbF9kYXRhJGNvbGxlY3Rpb25fdGVtcCkpLCAKICAgICAgICAgICAgIGNvbG91ciA9ICJncmV5NjAiLAogICAgICAgICAgICAgbGluZXdpZHRoID0gYygyLDEpLCAKICAgICAgICAgICAgIGFscGhhID0gMC41KSArIAogIGdlb21fYmFyKGRhdGEgPSB1bmlxdWUoc2VsZWN0KGZ1bGxfZGF0YSwgY29sbGVjdGlvbl9kYXRlLCBjb2xsZWN0aW9uX3RlbXApKSwgCiAgICAgICAgICAgYWVzKHggPSBhc19kYXRlKGNvbGxlY3Rpb25fZGF0ZSksIHkgPSBjb2xsZWN0aW9uX3RlbXApLAogICAgICAgICAgIHN0YXQgPSAiaWRlbnRpdHkiLAogICAgICAgICAgIGZpbGwgPSAiZ3JleTMwIikgKyAKICBnZW9tX3BvaW50KGRhdGEgPSBmdWxsX2RhdGEsIAogICAgICAgICAgICAgYWVzKHggPSBhc19kYXRlKGNvbGxlY3Rpb25fZGF0ZSksIHkgPSBjdG1heCksCiAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2ppdHRlcih3aWR0aCA9IDAuNywgaGVpZ2h0ID0gMCksCiAgICAgICAgICAgICBjb2xvdXIgPSAiZ3JleTMwIiwKICAgICAgICAgICAgIGFscGhhID0gMC41KSArIAogIHlsaW0oLTMsIDQwKSArIAogIGNvb3JkX3BvbGFyKHN0YXJ0ID0gMCkgKyAKICB0aGVtZV92b2lkKCkKYGBgCgoKU2l6ZSBhbHNvIHZhcmllZCwgYnV0IHByaW1hcmlseSBiZXR3ZWVuIHJhdGhlciB0aGFuIHdpdGhpbiBzcGVjaWVzLiAKCmBgYHtyIHNpemUtdGltZXNlcmllcywgZmlnLndpZHRoPTEwLCBmaWcuaGVpZ2h0PTV9CmdncGxvdCgpICsgCiAgZ2VvbV92bGluZShkYXRhID0gdW5pcXVlKHNlbGVjdChmdWxsX2RhdGEsIGNvbGxlY3Rpb25fZGF0ZSkpLCAKICAgICAgICAgICAgIGFlcyh4aW50ZXJjZXB0ID0gYXMuRGF0ZShjb2xsZWN0aW9uX2RhdGUpKSwKICAgICAgICAgICAgIGNvbG91ciA9ICJncmV5OTAiLAogICAgICAgICAgICAgbGluZXdpZHRoID0gMSkgKyAKICBnZW9tX2xpbmUoZGF0YSA9IGNvbGxlY3Rpb25fY29uZGl0aW9ucywgCiAgICAgICAgICAgIGFlcyh4ID0gYXMuRGF0ZShkYXRlKSwgeSA9IG1lYW5fdGVtcCksCiAgICAgICAgICAgIGNvbG91ciA9ICJibGFjayIsIAogICAgICAgICAgICBsaW5ld2lkdGggPSAyKSArIAogICMgZ2VvbV9lcnJvcmJhcihkYXRhID0gc3BlY2llc19zdW1tYXJpZXMsCiAgIyAgICAgICAgICAgICAgIGFlcyh4ID0gYXMuRGF0ZShjb2xsZWN0aW9uX2RhdGUpLCAKICAjICAgICAgICAgICAgICAgICAgIHltaW4gPSBtZWFuX2N0bWF4IC0gY3RtYXhfc3RfZXJyLCB5bWF4ID0gbWVhbl9jdG1heCArIGN0bWF4X3N0X2VyciwKICAjICAgICAgICAgICAgICAgICAgIGNvbG91ciA9IHNwX25hbWUpLAogICMgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMSksCiAgIyAgICAgICAgICAgICAgIHdpZHRoID0gNSwgbGluZXdpZHRoID0gMSkgKyAKICBnZW9tX3BvaW50KGRhdGEgPSBhZHVsdF9zdW1tYXJpZXMsIAogICAgICAgICAgICAgYWVzKHggPSBhcy5EYXRlKGNvbGxlY3Rpb25fZGF0ZSksIHkgPSBtZWFuX3NpemUgKiA0MCwgY29sb3VyID0gc3BfbmFtZSwgc2l6ZSA9IHNhbXBsZV9zaXplKSwKICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAxKSkgKyAKICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcyA9IHNwZWNpZXNfY29scykgKyAKICBzY2FsZV95X2NvbnRpbnVvdXMoCiAgICBuYW1lID0gIlRlbXBlcmF0dXJlIiwgIyBGZWF0dXJlcyBvZiB0aGUgZmlyc3QgYXhpcwogICAgc2VjLmF4aXMgPSBzZWNfYXhpcyh+Li80MCwgbmFtZT0iUHJvc29tZSBMZW5ndGggKG1tKSIpLCAjIEFkZCBhIHNlY29uZCBheGlzIGFuZCBzcGVjaWZ5IGl0cyBmZWF0dXJlcwogICAgYnJlYWtzID0gYygwLDUsMTAsMTUsMjAsMjUsMzApCiAgKSArIAogIGxhYnMoeCA9ICJEYXRlIiwgCiAgICAgICB5ID0gIlRlbXBlcmF0dXJlICjCsEMpIiwgCiAgICAgICBjb2xvdXIgPSAiU3BlY2llcyIpICsgCiAgdGhlbWVfbWF0dCgpICsgCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gInJpZ2h0IikKYGBgCgpTaG93biBiZWxvdyBpcyBDVG1heCBhbmQgYm9keSBzaXplIGZvciB0aGUgc3BlY2llcyB3aXRoIHRoZSBtb3N0IGRhdGEgKCpTa2lzdG9kaWFwdG9tdXMqLCAqTC4gbWludXR1cyosICpMLiBzaWNpbGlzKiwgYW5kICpFcGlzY2h1cmEqKSwgcGxvdHRlZCBhZ2FpbnN0IHRoZSBkYXkgb2YgdGhlIHllYXIgZm9yIGVhY2ggc2V4L3N0YWdlIHNlcGFyYXRlbHkuIAoKYGBge3IgdHJhaXQtZG95LWZlYXR1cmUsIGZpZy53aWR0aCA9IDE0LCBmaWcuaGVpZ2h0ID0gN30KY3RtYXhfZmVhdHVyZSA9IGZ1bGxfZGF0YSAlPiUgIAogIG11dGF0ZShkb3kgPSB5ZGF5KGNvbGxlY3Rpb25fZGF0ZSkpICU+JSAKICBmaWx0ZXIoc3BfbmFtZSAlaW4lIGMoIlNraXN0b2RpYXB0b211cyBvcmVnb25lbnNpcyIsICJMZXB0b2RpYXB0b211cyBtaW51dHVzIiwgIkxlcHRvZGlhcHRvbXVzIHNpY2lsaXMiLCAiRXBpc2NodXJhIGxhY3VzdHJpcyIpKSAlPiUgCiAgZ2dwbG90KGFlcyh4ID0gYXMuRGF0ZShjb2xsZWN0aW9uX2RhdGUpLCB5ID0gY3RtYXgsIGNvbG91ciA9IHNwX25hbWUpKSArIAogIGZhY2V0X2dyaWQoc3BfbmFtZX5zZXgpICsgCiAgZ2VvbV9wb2ludCgpICsgCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBzcGVjaWVzX2NvbHMpICsgCiAgbGFicyh4ID0gIkRheSBvZiB0aGUgWWVhciIsIAogICAgICAgeSA9ICJDVG1heCAowrBDKSIpICsgCiAgdGhlbWVfbWF0dF9mYWNldHMoKSArCiAgdGhlbWUoYXhpcy50ZXh0LnggPSBlbGVtZW50X3RleHQoYW5nbGUgPSAzMDAsIGhqdXN0ID0gMCwgdmp1c3QgPSAwLjUpLAogICAgICAgIGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikKCnNpemVfZmVhdHVyZSA9IGZ1bGxfZGF0YSAlPiUgIAogIG11dGF0ZShkb3kgPSB5ZGF5KGNvbGxlY3Rpb25fZGF0ZSkpICU+JSAKICBmaWx0ZXIoc3BfbmFtZSAlaW4lIGMoIlNraXN0b2RpYXB0b211cyBvcmVnb25lbnNpcyIsICJMZXB0b2RpYXB0b211cyBtaW51dHVzIiwgIkxlcHRvZGlhcHRvbXVzIHNpY2lsaXMiLCAiRXBpc2NodXJhIGxhY3VzdHJpcyIpKSAlPiUgCiAgZ2dwbG90KGFlcyh4ID0gYXMuRGF0ZShjb2xsZWN0aW9uX2RhdGUpLCB5ID0gc2l6ZSwgY29sb3VyID0gc3BfbmFtZSkpICsgCiAgZmFjZXRfZ3JpZChzcF9uYW1lfnNleCkgKyAKICBnZW9tX3BvaW50KCkgKyAKICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcyA9IHNwZWNpZXNfY29scykgKyAKICBsYWJzKHggPSAiRGF5IG9mIHRoZSBZZWFyIiwgCiAgICAgICB5ID0gIlNpemUgKG1tKSIpICsgCiAgdGhlbWVfbWF0dF9mYWNldHMoKSArCiAgdGhlbWUoYXhpcy50ZXh0LnggPSBlbGVtZW50X3RleHQoYW5nbGUgPSAzMDAsIGhqdXN0ID0gMCwgdmp1c3QgPSAwLjUpLAogICAgICAgIGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikKCmdnYXJyYW5nZShjdG1heF9mZWF0dXJlLCBzaXplX2ZlYXR1cmUsIGNvbW1vbi5sZWdlbmQgPSBULCBsZWdlbmQgPSAibm9uZSIpCmBgYAoKYGBge3Igc3Atb2NjdXJlbmNlcywgZmlnLndpZHRoPTcsIGZpZy5oZWlnaHQ9NX0KZnVsbF9kYXRhICU+JSAgCiAgZmlsdGVyKHNwX25hbWUgIT0gIk9zcGhyYW50aWN1bSBsYWJyb25lY3R1bSIpICU+JSAKICBtdXRhdGUoc3BfbmFtZSA9IGFzLmZhY3RvcihzcF9uYW1lKSwKICAgICAgICAgc3BfbmFtZSA9IGZjdF9yZW9yZGVyKHNwX25hbWUsIGN0bWF4KSkgJT4lIAogIGdncGxvdChhZXMoeCA9IGx1YnJpZGF0ZTo6YXNfZGF0ZShjb2xsZWN0aW9uX2RhdGUpLCAKICAgICAgICAgICAgIHkgPSBzcF9uYW1lLCBmaWxsID0gc3BfbmFtZSkpICsgCiAgIyBnZW9tX3ZsaW5lKHhpbnRlcmNlcHQgPSBhc19kYXRlKAogICMgICBjKCIyMDIzLTA1LTAxIiwKICAjICAgICAiMjAyMy0wOS0wMSIsCiAgIyAgICAgIjIwMjQtMDEtMDEiLAogICMgICAgICIyMDI0LTA1LTAxIikpLAogICMgICBjb2xvdXIgPSAiZ3JleSIsCiAgIyAgIGxpbmV3aWR0aCA9IDEpICsgCiAgZ2VvbV9kZW5zaXR5X3JpZGdlcyhiYW5kd2lkdGggPSAzMCwKICAgICAgICAgICAgICAgICAgICAgIGppdHRlcmVkX3BvaW50cyA9IFRSVUUsIAogICAgICAgICAgICAgICAgICAgICAgcG9pbnRfc2hhcGUgPSAyMSwKICAgICAgICAgICAgICAgICAgICAgIHBvaW50X3NpemUgPSAxLAogICAgICAgICAgICAgICAgICAgICAgcG9pbnRfY29sb3VyID0gImdyZXkzMCIsCiAgICAgICAgICAgICAgICAgICAgICBwb2ludF9hbHBoYSA9IDAuNiwKICAgICAgICAgICAgICAgICAgICAgIGFscGhhID0gMC45LAogICAgICAgICAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9wb2ludHNfaml0dGVyKAogICAgICAgICAgICAgICAgICAgICAgICBoZWlnaHQgPSAwLjEsIHdpZHRoID0gMCkpICsgCiAgc2NhbGVfZmlsbF9tYW51YWwodmFsdWVzID0gc3BlY2llc19jb2xzKSArIAogIHNjYWxlX3hfZGF0ZShkYXRlX2JyZWFrcyA9ICI0IG1vbnRocyIsCiAgICAgICAgICAgICAgIGRhdGVfbGFiZWxzID0gIiViIikgKyAKICBsYWJzKHggPSAiRGF5IG9mIFllYXIiLCAKICAgICAgIHkgPSAiU3BlY2llcyIpICsgCiAgdGhlbWVfbWF0dCgpICsgCiAgI3RoZW1lX3JpZGdlcyhncmlkID0gVCkgKyAKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAibm9uZSIsCiAgICAgICAgYXhpcy50ZXh0LnggPSBlbGVtZW50X3RleHQoYW5nbGUgPSAyNzAsIGhqdXN0ID0gMCwgdmp1c3QgPSAwLjUpKQpgYGAKCmBgYHtyIHNwLXByb3BzLCBmaWcud2lkdGggPSAxMiwgZmlnLmhlaWdodCA9IDV9CmFkdWx0X3N1bW1hcmllcyAlPiUgCiAgdW5ncm91cCgpICU+JSAKICBtdXRhdGUoY29sbGVjdGlvbl9udW0gPSBhcy5udW1lcmljKGZhY3Rvcihjb2xsZWN0aW9uX2RhdGUpKSkgJT4lIAogIGdyb3VwX2J5KGNvbGxlY3Rpb25fZGF0ZSkgJT4lICAKICBhcnJhbmdlKGNvbGxlY3Rpb25fZGF0ZSkgJT4lIAogIHNlbGVjdChzcF9uYW1lLCBjb2xsZWN0aW9uX2RhdGUsIGNvbGxlY3Rpb25fbnVtLCBzYW1wbGVfc2l6ZSkgJT4lIAogIG11dGF0ZShzYW1wbGVfc2l6ZSA9IHJlcGxhY2VfbmEoc2FtcGxlX3NpemUsIDApKSAlPiUgCiAgbXV0YXRlKHRvdGFsID0gc3VtKHNhbXBsZV9zaXplKSwKICAgICAgICAgcGVyY2VudGFnZSA9IHNhbXBsZV9zaXplIC8gdG90YWwsCiAgICAgICAgIGNvbGxlY3Rpb25fZGF0ZSA9IGx1YnJpZGF0ZTo6YXNfZGF0ZShjb2xsZWN0aW9uX2RhdGUpKSAlPiUgCiAgZ2dwbG90KGFlcyh4ID0gY29sbGVjdGlvbl9kYXRlLCB5ID0gcGVyY2VudGFnZSwgZmlsbCA9IHNwX25hbWUpKSArIAogIGdlb21fYXJlYSgpICsgCiAgc2NhbGVfZmlsbF9tYW51YWwodmFsdWVzID0gc3BlY2llc19jb2xzKSArIAogIHNjYWxlX3lfY29udGludW91cyhicmVha3MgPSBjKDAsMSkpICsgCiAgbGFicyh4ID0gIkNvbGxlY3Rpb24gRGF0ZSIsIAogICAgICAgeSA9ICJQcm9wb3J0aW9uIiwgCiAgICAgICBmaWxsID0gIlNwZWNpZXMiKSArIAogIHRoZW1lX21pbmltYWwoYmFzZV9zaXplID0gMjApICsgCiAgdGhlbWUocGFuZWwuZ3JpZCA9IGVsZW1lbnRfYmxhbmsoKSwKICAgICAgICBheGlzLnRpY2tzID0gZWxlbWVudF9saW5lKCkpCmBgYAoKYGBge3IgcGF0aG9nZW4tcHJvcHN9CnBhdGhvZ2VuX2NvbHMgPSBjKCJubyIgPSAiZ3JleTk1IiwgImNsb3VkeSIgPSAiaG9uZXlkZXczIiwgInNwb3QiID0gImFudGlxdWV3aGl0ZTMiLCAib3RoZXIiID0gInRvbWF0bzMiKQoKZnVsbF9kYXRhICU+JSAKICBzZWxlY3QoY29sbGVjdGlvbl9kYXRlLCBkZXZfZWdncywgcGF0aG9nZW4sIGxpcGlkcywgc3BfbmFtZSwgc2V4KSAlPiUgCiAgZ3JvdXBfYnkoKSAlPiUgCiAgZmlsdGVyKHNleCAhPSAianV2ZW5pbGUiKSAlPiUgCiAgZ3JvdXBfYnkoY29sbGVjdGlvbl9kYXRlKSAlPiUgCiAgY291bnQocGF0aG9nZW4pICU+JSAKICBmaWx0ZXIocGF0aG9nZW4gIT0gInVuY2VydGFpbiIpICU+JSAKICBwaXZvdF93aWRlcihpZF9jb2xzID0gImNvbGxlY3Rpb25fZGF0ZSIsIAogICAgICAgICAgICAgIG5hbWVzX2Zyb20gPSBwYXRob2dlbiwgCiAgICAgICAgICAgICAgdmFsdWVzX2Zyb20gPSBuLAogICAgICAgICAgICAgIHZhbHVlc19maWxsID0gMCkgJT4lIAogIG11dGF0ZSh0b3RhbCA9IHN1bShubywgY2xvdWR5LCBzcG90LCBvdGhlcikpICU+JSAKICBwaXZvdF9sb25nZXIoY29scyA9IGMobm8sIGNsb3VkeSwgc3BvdCwgb3RoZXIpLAogICAgICAgICAgICAgICBuYW1lc190byA9ICJwYXRob2dlbiIsIAogICAgICAgICAgICAgICB2YWx1ZXNfdG8gPSAiY291bnQiKSAlPiUgCiAgbXV0YXRlKHBlcmNlbnQgPSBjb3VudC90b3RhbCwKICAgICAgICAgY29sbGVjdGlvbl9kYXRlID0gbHVicmlkYXRlOjphc19kYXRlKGNvbGxlY3Rpb25fZGF0ZSksCiAgICAgICAgIHBhdGhvZ2VuID0gZmN0X3JlbGV2ZWwocGF0aG9nZW4sICJubyIsICJjbG91ZHkiLCAic3BvdCIsICJvdGhlciIpKSAlPiUgCiAgZ2dwbG90KGFlcyh4ID0gY29sbGVjdGlvbl9kYXRlLCB5ID0gcGVyY2VudCwgZmlsbCA9IHBhdGhvZ2VuKSkgKyAKICBnZW9tX2FyZWEoKSArIAogIHNjYWxlX2ZpbGxfbWFudWFsKHZhbHVlcyA9IHBhdGhvZ2VuX2NvbHMpICsgCiAgc2NhbGVfeV9jb250aW51b3VzKGJyZWFrcyA9IGMoMCwxKSkgKyAKICBsYWJzKHggPSAiQ29sbGVjdGlvbiBEYXRlIiwgCiAgICAgICB5ID0gIlByb3BvcnRpb24iLCAKICAgICAgIGZpbGwgPSAiUGF0aG9nZW4iKSArIAogIHRoZW1lX21pbmltYWwoYmFzZV9zaXplID0gMjApICsgCiAgdGhlbWUocGFuZWwuZ3JpZCA9IGVsZW1lbnRfYmxhbmsoKSwKICAgICAgICBheGlzLnRpY2tzID0gZWxlbWVudF9saW5lKCkpCmBgYAoKYGBge3IgZGV2ZWdncy1wcm9wcywgZmlnLmhlaWdodCA9IDEyLCBmaWcud2lkdGggPSA4fQpkZXZfZWdnc19jb2xzID0gYygibm8iID0gImdyZXk5NSIsICJ5ZXMiID0gImxpZ2h0Ymx1ZTMiKQoKZnVsbF9kYXRhICU+JSAKICBzZWxlY3QoY29sbGVjdGlvbl9kYXRlLCBkZXZfZWdncywgcGF0aG9nZW4sIGxpcGlkcywgc3BfbmFtZSwgc2V4KSAlPiUgCiAgZ3JvdXBfYnkoc3BfbmFtZSkgJT4lIAogIGZpbHRlcihzZXggIT0gImp1dmVuaWxlIikgJT4lIAogIGdyb3VwX2J5KHNwX25hbWUsIGNvbGxlY3Rpb25fZGF0ZSkgJT4lIAogIGNvdW50KGRldl9lZ2dzKSAlPiUgCiAgZmlsdGVyKGRldl9lZ2dzICE9ICJ1bmNlcnRhaW4iKSAlPiUgCiAgcGl2b3Rfd2lkZXIoaWRfY29scyA9IGMoImNvbGxlY3Rpb25fZGF0ZSIsICJzcF9uYW1lIiksIAogICAgICAgICAgICAgIG5hbWVzX2Zyb20gPSBkZXZfZWdncywgCiAgICAgICAgICAgICAgdmFsdWVzX2Zyb20gPSBuLAogICAgICAgICAgICAgIHZhbHVlc19maWxsID0gMCkgJT4lIAogIG11dGF0ZSh0b3RhbCA9IHN1bShubywgeWVzKSkgJT4lIAogIHBpdm90X2xvbmdlcihjb2xzID0gYyhubywgeWVzKSwKICAgICAgICAgICAgICAgbmFtZXNfdG8gPSAiZGV2X2VnZ3MiLCAKICAgICAgICAgICAgICAgdmFsdWVzX3RvID0gImNvdW50IikgJT4lIAogIG11dGF0ZShwZXJjZW50ID0gY291bnQvdG90YWwsCiAgICAgICAgIGNvbGxlY3Rpb25fZGF0ZSA9IGx1YnJpZGF0ZTo6YXNfZGF0ZShjb2xsZWN0aW9uX2RhdGUpLAogICAgICAgICBkZXZfZWdncyA9IGZjdF9yZWxldmVsKGRldl9lZ2dzLCAibm8iLCAieWVzIikpICU+JSAKICB1bmdyb3VwKCkgJT4lIAogIGNvbXBsZXRlKGNvbGxlY3Rpb25fZGF0ZSwgbmVzdGluZyhzcF9uYW1lLCBkZXZfZWdncyksIGZpbGwgPSBsaXN0KHBlcmNlbnQgPSAxKSkgJT4lIAogIG11dGF0ZShwZXJjZW50ID0gaWZfZWxzZShpcy5uYSh0b3RhbCkgJiBkZXZfZWdncyA9PSAieWVzIiwgMCwgcGVyY2VudCkpICU+JSAKICBnZ3Bsb3QoYWVzKHggPSBjb2xsZWN0aW9uX2RhdGUsIHkgPSBwZXJjZW50LCBmaWxsID0gZGV2X2VnZ3MpKSArIAogIGZhY2V0X3dyYXAoc3BfbmFtZX4uLCBuY29sID0gMSkgKyAKICBnZW9tX2FyZWEoKSArIAogIHNjYWxlX2ZpbGxfbWFudWFsKHZhbHVlcyA9IGRldl9lZ2dzX2NvbHMpICsgCiAgc2NhbGVfeV9jb250aW51b3VzKGJyZWFrcyA9IGMoMCwxKSkgKyAKICBsYWJzKHggPSAiQ29sbGVjdGlvbiBEYXRlIiwgCiAgICAgICB5ID0gIlByb3BvcnRpb24iLCAKICAgICAgIGZpbGwgPSAiRGV2ZWxvcGluZyBcbkVnZ3MiKSArIAogIHRoZW1lX21pbmltYWwoYmFzZV9zaXplID0gMjApICsgCiAgdGhlbWUocGFuZWwuZ3JpZCA9IGVsZW1lbnRfYmxhbmsoKSwKICAgICAgICBheGlzLnRpY2tzID0gZWxlbWVudF9saW5lKCkpCmBgYAoKYGBge3IgbGlwaWRzLXByb3BzLCBmaWcuaGVpZ2h0ID0gMTIsIGZpZy53aWR0aCA9IDh9CmxpcGlkX2NvbHMgPSBjKCJubyIgPSAiZ3JleTk1IiwgInllcyIgPSAic2llbm5hMiIpCgpmdWxsX2RhdGEgJT4lIAogIHNlbGVjdChjb2xsZWN0aW9uX2RhdGUsIGRldl9lZ2dzLCBwYXRob2dlbiwgbGlwaWRzLCBzcF9uYW1lLCBzZXgpICU+JSAKICBncm91cF9ieShzcF9uYW1lKSAlPiUgCiAgZmlsdGVyKHNleCAhPSAianV2ZW5pbGUiKSAlPiUgCiAgZ3JvdXBfYnkoc3BfbmFtZSwgY29sbGVjdGlvbl9kYXRlKSAlPiUgCiAgY291bnQobGlwaWRzKSAlPiUgCiAgZmlsdGVyKGxpcGlkcyAhPSAidW5jZXJ0YWluIikgJT4lIAogIHBpdm90X3dpZGVyKGlkX2NvbHMgPSBjKCJjb2xsZWN0aW9uX2RhdGUiLCAic3BfbmFtZSIpLCAKICAgICAgICAgICAgICBuYW1lc19mcm9tID0gbGlwaWRzLCAKICAgICAgICAgICAgICB2YWx1ZXNfZnJvbSA9IG4sCiAgICAgICAgICAgICAgdmFsdWVzX2ZpbGwgPSAwKSAlPiUgCiAgbXV0YXRlKHRvdGFsID0gc3VtKG5vLCB5ZXMpKSAlPiUgCiAgcGl2b3RfbG9uZ2VyKGNvbHMgPSBjKG5vLCB5ZXMpLAogICAgICAgICAgICAgICBuYW1lc190byA9ICJsaXBpZHMiLCAKICAgICAgICAgICAgICAgdmFsdWVzX3RvID0gImNvdW50IikgJT4lIAogIG11dGF0ZShwZXJjZW50ID0gY291bnQvdG90YWwsCiAgICAgICAgIGNvbGxlY3Rpb25fZGF0ZSA9IGx1YnJpZGF0ZTo6YXNfZGF0ZShjb2xsZWN0aW9uX2RhdGUpLAogICAgICAgICBsaXBpZHMgPSBmY3RfcmVsZXZlbChsaXBpZHMsICJubyIsICJ5ZXMiKSkgJT4lIAogIHVuZ3JvdXAoKSAlPiUgCiAgY29tcGxldGUoY29sbGVjdGlvbl9kYXRlLCBuZXN0aW5nKHNwX25hbWUsIGxpcGlkcyksIGZpbGwgPSBsaXN0KHBlcmNlbnQgPSAxKSkgJT4lIAogIG11dGF0ZShwZXJjZW50ID0gaWZfZWxzZShpcy5uYSh0b3RhbCkgJiBsaXBpZHMgPT0gInllcyIsIDAsIHBlcmNlbnQpKSAlPiUgCiAgZ2dwbG90KGFlcyh4ID0gY29sbGVjdGlvbl9kYXRlLCB5ID0gcGVyY2VudCwgZmlsbCA9IGxpcGlkcykpICsgCiAgZmFjZXRfd3JhcChzcF9uYW1lfi4sIG5jb2wgPSAxKSArIAogIGdlb21fYXJlYSgpICsgCiAgc2NhbGVfZmlsbF9tYW51YWwodmFsdWVzID0gbGlwaWRfY29scykgKyAKICBzY2FsZV95X2NvbnRpbnVvdXMoYnJlYWtzID0gYygwLDEpKSArIAogIGxhYnMoeCA9ICJDb2xsZWN0aW9uIERhdGUiLCAKICAgICAgIHkgPSAiUHJvcG9ydGlvbiIsIAogICAgICAgZmlsbCA9ICJMaXBpZHNcblByZXNlbnQiKSArIAogIHRoZW1lX21pbmltYWwoYmFzZV9zaXplID0gMjApICsgCiAgdGhlbWUocGFuZWwuZ3JpZCA9IGVsZW1lbnRfYmxhbmsoKSwKICAgICAgICBheGlzLnRpY2tzID0gZWxlbWVudF9saW5lKCkpCmBgYAoKCiMjIFRlbXBlcmF0dXJlIFZhcmlhYmlsaXR5Ckxha2UgQ2hhbXBsYWluIGlzIGhpZ2hseSBzZWFzb25hbCwgd2l0aCBib3RoIGF2ZXJhZ2UgdGVtcGVyYXR1cmVzIGFuZCB0ZW1wZXJhdHVyZSB2YXJpYWJpbGl0eSBjaGFuZ2luZyB0aHJvdWdob3V0IHRoZSB5ZWFyLiBUaGVzZSBwYXR0ZXJucyBpbiB0aGUgZXhwZXJpZW5jZWQgdGhlcm1hbCBlbnZpcm9ubWVudCBtYXkgZHJpdmUgdGhlIG9ic2VydmVkIHZhcmlhdGlvbiBpbiBjb3BlcG9kIHRoZXJtYWwgbGltaXRzLiBIb3dldmVyLCB0aGUgdGltZSBwZXJpb2QgYWZmZWN0aW5nIGNvcGVwb2QgdGhlcm1hbCBsaW1pdHMgaXMgdW5rbm93bi4gRGVwZW5kaW5nIHRoZSBvbiB0aGUgZHVyYXRpb24gb2YgdGltZSBjb25zaWRlcmVkLCB0aGVyZSBhcmUgbGFyZ2UgY2hhbmdlcyBpbiB0aGUgZXhwZXJpZW5jZWQgZW52aXJvbm1lbnQsIGluIHBhcnRpY3VsYXIgcmVnYXJkaW5nIHRoZSB0ZW1wZXJhdHVyZSByYW5nZSBhbmQgdmFyaWFuY2UuIENvbnNpZGVyIGZvciBleGFtcGxlIHRocmVlIHRpbWUgcGVyaW9kczogdGhlIGRheSBvZiBjb2xsZWN0aW9uLCBvbmUgd2VlayBwcmlvciB0byBjb2xsZWN0aW9uLCBhbmQgZm91ciB3ZWVrcyBwcmlvciB0byBjb2xsZWN0aW9uLiBXaGlsZSB0aGUgb3ZlcmFsbCBwYXR0ZXJuIGlzIHNpbWlsYXIsIHdlIGNhbiBzZWUgdGhhdCwgdW5zdXJwcmlzaW5nbHksIGNvbnNpZGVyaW5nIGxvbmdlciBwZXJpb2RzIG9mIHRpbWUgcmVzdWx0cyBpbiBsYXJnZXIgcmFuZ2VzIGFuZCBzbGlnaHRseSBjaGFuZ2VzIHRoZSBwYXR0ZXJuIG9mIHZhcmlhbmNlIGV4cGVyaWVuY2VkLiAKCmBgYHtyIGRhaWx5LXRlbXAtZGF0YX0KIyMgRGFpbHkgdmFsdWVzCmRhaWx5X3RlbXBfZGF0YSA9IHRlbXBfZGF0YSAlPiUKICB1bmdyb3VwKCkgJT4lIAogIGdyb3VwX2J5KGRhdGUpICU+JSAKICBzdW1tYXJpc2UobWVhbl90ZW1wID0gbWVhbih0ZW1wKSwKICAgICAgICAgICAgbWVkX3RlbXAgPSBtZWRpYW4odGVtcCksCiAgICAgICAgICAgIHZhcl90ZW1wID0gdmFyKHRlbXApLCAKICAgICAgICAgICAgbWluX3RlbXAgPSBtaW4odGVtcCksIAogICAgICAgICAgICBtYXhfdGVtcCA9IG1heCh0ZW1wKSkgJT4lIAogIG11dGF0ZSgicmFuZ2VfdGVtcCIgPSBtYXhfdGVtcCAtIG1pbl90ZW1wKQoKZGF5X3ByaW9yX3RlbXBfZGF0YSA9IHRlbXBfZGF0YSAlPiUgCiAgdW5ncm91cCgpICU+JSAKICBncm91cF9ieShkYXRlKSAlPiUgCiAgc3VtbWFyaXNlKG1lYW5fdGVtcCA9IG1lYW4odGVtcCksCiAgICAgICAgICAgIG1lZF90ZW1wID0gbWVkaWFuKHRlbXApLAogICAgICAgICAgICB2YXJfdGVtcCA9IHZhcih0ZW1wKSwgCiAgICAgICAgICAgIG1pbl90ZW1wID0gbWluKHRlbXApLCAKICAgICAgICAgICAgbWF4X3RlbXAgPSBtYXgodGVtcCkpICU+JSAKICBtdXRhdGUoZGF0ZSA9IGRhdGUgKyAxKSAlPiUgCiAgcmVuYW1lX3dpdGgoLmZuID0gfiBwYXN0ZTAoInByaW9yX2RheV8iLCAueCksIC5jb2xzID0gYygtZGF0ZSkpCgpkYWlseV9wbG90ID0gZGFpbHlfdGVtcF9kYXRhICU+JSAKICBwaXZvdF9sb25nZXIoY29scyA9IGMoLWRhdGUpLAogICAgICAgICAgICAgICBuYW1lc190byA9ICJwYXJhbWV0ZXIiLCAKICAgICAgICAgICAgICAgdmFsdWVzX3RvID0gInRlbXAiKSAlPiUgCiAgZ2dwbG90KGFlcyh4ID0gZGF0ZSwgeSA9IHRlbXAsIGNvbG91ciA9IHBhcmFtZXRlcikpICsgCiAgZ2VvbV9saW5lKGxpbmV3aWR0aCA9IDEpICsgCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBjKAogICAgIm1lYW5fdGVtcCIgPSAib2xpdmVkcmFiMyIsCiAgICAibWVkX3RlbXAiID0gInNlYWdyZWVuMyIsCiAgICAibWF4X3RlbXAiID0gInRvbWF0byIsICAKICAgICJtaW5fdGVtcCIgPSAiZG9kZ2VyYmx1ZSIsCiAgICAicmFuZ2VfdGVtcCIgPSAiZ29sZGVucm9kMyIsCiAgICAidmFyX3RlbXAiID0gImRhcmtnb2xkZW5yb2QxIgogICkpICsgCiAgc2NhbGVfeF9jb250aW51b3VzKGJyZWFrcyA9IGFzLkRhdGUoYygiMjAyMy0wMS0wMSIsICIyMDIzLTA0LTAxIiwgIjIwMjMtMDctMDEiKSkpICsgCiAgZ2d0aXRsZSgiRGFpbHkgVmFsdWVzIikgKyAKICBsYWJzKHkgPSAiVGVtcGVyYXR1cmUgKMKwQykiLAogICAgICAgeCA9ICIiKSArIAogIHRoZW1lX2J3KGJhc2Vfc2l6ZSA9IDIwKSArIAogIHRoZW1lKHBhbmVsLmdyaWQgPSBlbGVtZW50X2JsYW5rKCksCiAgICAgICAgYXhpcy50ZXh0LnggPSBlbGVtZW50X3RleHQoYW5nbGUgPSAyNzAsIGhqdXN0ID0gMCwgdmp1c3QgPSAwLjUpKQpgYGAKCmBgYHtyIHByZWRpY3RvcnMtZnVuY3Rpb259CiMjIERlZmluaW5nIHRoZSBmdW5jdGlvbiB0byBnZXQgcHJlZGljdG9yIHZhbHVlcyBmb3IgcGVyaW9kcyBvZiBkaWZmZXJlbnQgbGVuZ3RocwpnZXRfcHJlZGljdG9ycyA9IGZ1bmN0aW9uKGRhaWx5X3ZhbHVlcywgcmF3X3RlbXAsIG5fZGF5cyl7CiAgcHJlZml4ID0gc3RyX3JlcGxhY2VfYWxsKHhmdW46Om51bWJlcnNfdG9fd29yZHMobl9kYXlzKSwgcGF0dGVybiA9ICIgIiwgcmVwbGFjZW1lbnQgPSAiLSIpCiAgCiAgbWVhbl92YWx1ZXMgPSBkYWlseV92YWx1ZXMgJT4lIAogICAgdW5ncm91cCgpICU+JSAKICAgIG11dGF0ZShtZWFuX21heCA9IHNsaWRlX3ZlYygueCA9IG1heF90ZW1wLCAuZiA9IG1lYW4sIC5iZWZvcmUgPSBuX2RheXMsIC5jb21wbGV0ZSA9IFQpLAogICAgICAgICAgIG1lYW5fbWluID0gc2xpZGVfdmVjKC54ID0gbWluX3RlbXAsIC5mID0gbWVhbiwgLmJlZm9yZSA9IG5fZGF5cywgLmNvbXBsZXRlID0gVCksCiAgICAgICAgICAgbWVhbl9yYW5nZSA9IHNsaWRlX3ZlYygueCA9IHJhbmdlX3RlbXAsIC5mID0gbWVhbiwgLmJlZm9yZSA9IG5fZGF5cywgLmNvbXBsZXRlID0gVCkpICU+JSAKICAgIHNlbGVjdChkYXRlLCBtZWFuX21heCwgbWVhbl9taW4sIG1lYW5fcmFuZ2UpICU+JSAKICAgIHJlbmFtZV93aXRoKCB+IHBhc3RlKHByZWZpeCwgImRheSIsIC54LCBzZXAgPSAiXyIpLCAuY29scyA9IGMoLWRhdGUpKQogIAogIHBlcmlvZF92YWx1ZXMgPSByYXdfdGVtcCAlPiUgCiAgICBtdXRhdGUobWVhbiA9IHNsaWRlX2luZGV4X21lYW4odGVtcCwgaSA9IGRhdGUsIGJlZm9yZSA9IGRheXMobl9kYXlzKSwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbmFfcm0gPSBUKSwKICAgICAgICAgICBtYXggPSBzbGlkZV9pbmRleF9tYXgodGVtcCwgaSA9IGRhdGUsIGJlZm9yZSA9IGRheXMobl9kYXlzKSwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG5hX3JtID0gVCksCiAgICAgICAgICAgbWluID0gc2xpZGVfaW5kZXhfbWluKHRlbXAsIGkgPSBkYXRlLCBiZWZvcmUgPSBkYXlzKG5fZGF5cyksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG5hX3JtID0gVCksCiAgICAgICAgICAgbWVkID0gc2xpZGVfaW5kZXhfZGJsKHRlbXAsIC5pID0gZGF0ZSwgLmJlZm9yZSA9IGRheXMobl9kYXlzKSwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG5hX3JtID0gVCwgLmYgPSBtZWRpYW4pLAogICAgICAgICAgIHZhciA9IHNsaWRlX2luZGV4X2RibCh0ZW1wLCAuaSA9IGRhdGUsIC5iZWZvcmUgPSBkYXlzKG5fZGF5cyksIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAuZiA9IHZhciksCiAgICAgICAgICAgcmFuZ2UgPSBtYXggLSBtaW4pICU+JSAgCiAgICBzZWxlY3QoLXRlbXApICU+JSAgCiAgICBkaXN0aW5jdCgpICU+JSAKICAgIHJlbmFtZV93aXRoKCB+IHBhc3RlKHByZWZpeCwgImRheSIsIC54LCBzZXAgPSAiXyIpLCAuY29scyA9IGMoLWRhdGUpKSU+JSAKICAgIGlubmVyX2pvaW4obWVhbl92YWx1ZXMsIGJ5ID0gYygiZGF0ZSIpKSAlPiUgIAogICAgZHJvcF9uYSgpCiAgCiAgcmV0dXJuKHBlcmlvZF92YWx1ZXMpCn0KYGBgCgpgYGB7ciBwcmVkaWN0b3JzLWFuZC1wbG90cywgZmlnLndpZHRoPTEyLCBmaWcuaGVpZ2h0PTV9CiMgIyMgR2V0dGluZyBwcmVkaWN0b3IgdmFyaWFibGVzIGZvciBkaWZmZXJlbnQgcGVyaW9kcwojIAojICMjIyBTaG9ydCAodGhyZWUgZGF5cykKIyB0aHJlZV9kYXlfdGVtcHMgPSBnZXRfcHJlZGljdG9ycyhkYWlseV92YWx1ZXMgPSBkYWlseV90ZW1wX2RhdGEsIAojICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJhd190ZW1wID0gdGVtcF9kYXRhLCAKIyAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBuX2RheXMgPSAzKQojIAojICMjIyBPTkUgV0VFSwp3ZWVrX3RlbXBzID0gZ2V0X3ByZWRpY3RvcnMoZGFpbHlfdmFsdWVzID0gZGFpbHlfdGVtcF9kYXRhLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgcmF3X3RlbXAgPSB0ZW1wX2RhdGEsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICBuX2RheXMgPSA3KQoKd2Vla19wbG90ID0gd2Vla190ZW1wcyAlPiUKICBwaXZvdF9sb25nZXIoY29scyA9IGMoLWRhdGUpLAogICAgICAgICAgICAgICBuYW1lc190byA9ICJwYXJhbWV0ZXIiLAogICAgICAgICAgICAgICB2YWx1ZXNfdG8gPSAidGVtcCIpICU+JQogIGZpbHRlcihwYXJhbWV0ZXIgJWluJSBjKCJzZXZlbl9kYXlfbWVhbiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgInNldmVuX2RheV9tZWQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICJzZXZlbl9kYXlfbWF4IiwKICAgICAgICAgICAgICAgICAgICAgICAgICAic2V2ZW5fZGF5X21pbiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgInNldmVuX2RheV92YXIiLAogICAgICAgICAgICAgICAgICAgICAgICAgICJzZXZlbl9kYXlfcmFuZ2UiKSkgJT4lCiAgbXV0YXRlKHBhcmFtZXRlciA9IHBhc3RlKHdvcmQocGFyYW1ldGVyLCBzdGFydCA9IDMsIHNlcCA9IGZpeGVkKCJfIikpLCAiX3RlbXAiLCBzZXAgPSAiIikpICU+JQogIGdncGxvdChhZXMoeCA9IGRhdGUsIHkgPSB0ZW1wLCBjb2xvdXIgPSBwYXJhbWV0ZXIpKSArCiAgZ2VvbV9saW5lKGxpbmV3aWR0aCA9IDEpICsKICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcyA9IGMoCiAgICAibWVhbl90ZW1wIiA9ICJvbGl2ZWRyYWIzIiwKICAgICJtZWRfdGVtcCIgPSAic2VhZ3JlZW4zIiwKICAgICJtYXhfdGVtcCIgPSAidG9tYXRvIiwKICAgICJtaW5fdGVtcCIgPSAiZG9kZ2VyYmx1ZSIsCiAgICAicmFuZ2VfdGVtcCIgPSAiZ29sZGVucm9kMyIsCiAgICAidmFyX3RlbXAiID0gImRhcmtnb2xkZW5yb2QxIgogICkpICsKICBzY2FsZV94X2NvbnRpbnVvdXMoYnJlYWtzID0gYXMuRGF0ZShjKCIyMDIzLTAxLTAxIiwgIjIwMjMtMDQtMDEiLCAiMjAyMy0wNy0wMSIpKSkgKwogIGdndGl0bGUoIk9uZSBXZWVrIikgKwogIGxhYnMoeSA9ICJUZW1wZXJhdHVyZSAowrBDKSIsCiAgICAgICB4ID0gIiIpICsKICB0aGVtZV9idyhiYXNlX3NpemUgPSAyMCkgKwogIHRoZW1lKHBhbmVsLmdyaWQgPSBlbGVtZW50X2JsYW5rKCksCiAgICAgICAgYXhpcy50ZXh0LnggPSBlbGVtZW50X3RleHQoYW5nbGUgPSAyNzAsIGhqdXN0ID0gMCwgdmp1c3QgPSAwLjUpKQojIAojIAojICMjIyBUV08gV0VFS1MKIyB0d29fd2Vla190ZW1wcyA9IGdldF9wcmVkaWN0b3JzKGRhaWx5X3ZhbHVlcyA9IGRhaWx5X3RlbXBfZGF0YSwgCiMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByYXdfdGVtcCA9IHRlbXBfZGF0YSwgCiMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBuX2RheXMgPSAxNCkKIyAKIyB0d29fd2Vla19wbG90ID0gdHdvX3dlZWtfdGVtcHMgJT4lIAojICAgcGl2b3RfbG9uZ2VyKGNvbHMgPSBjKC1kYXRlKSwKIyAgICAgICAgICAgICAgICBuYW1lc190byA9ICJwYXJhbWV0ZXIiLCAKIyAgICAgICAgICAgICAgICB2YWx1ZXNfdG8gPSAidGVtcCIpICU+JSAKIyAgIGZpbHRlcihwYXJhbWV0ZXIgJWluJSBjKCJmb3VydGVlbl9kYXlfbWVhbiIsCiMgICAgICAgICAgICAgICAgICAgICAgICAgICAiZm91cnRlZW5fZGF5X21lZCIsCiMgICAgICAgICAgICAgICAgICAgICAgICAgICAiZm91cnRlZW5fZGF5X21heCIsIAojICAgICAgICAgICAgICAgICAgICAgICAgICAgImZvdXJ0ZWVuX2RheV9taW4iLCAKIyAgICAgICAgICAgICAgICAgICAgICAgICAgICJmb3VydGVlbl9kYXlfdmFyIiwKIyAgICAgICAgICAgICAgICAgICAgICAgICAgICJmb3VydGVlbl9kYXlfcmFuZ2UiKSkgJT4lIAojICAgbXV0YXRlKHBhcmFtZXRlciA9IHBhc3RlKHdvcmQocGFyYW1ldGVyLCBzdGFydCA9IDMsIHNlcCA9IGZpeGVkKCJfIikpLCAiX3RlbXAiLCBzZXAgPSAiIikpICU+JSAKIyAgIGdncGxvdChhZXMoeCA9IGRhdGUsIHkgPSB0ZW1wLCBjb2xvdXIgPSBwYXJhbWV0ZXIpKSArIAojICAgZ2VvbV9saW5lKGxpbmV3aWR0aCA9IDEpICsgCiMgICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcyA9IGMoCiMgICAgICJtZWFuX3RlbXAiID0gIm9saXZlZHJhYjMiLAojICAgICAibWVkX3RlbXAiID0gInNlYWdyZWVuMyIsCiMgICAgICJtYXhfdGVtcCIgPSAidG9tYXRvIiwgIAojICAgICAibWluX3RlbXAiID0gImRvZGdlcmJsdWUiLAojICAgICAicmFuZ2VfdGVtcCIgPSAiZ29sZGVucm9kMyIsCiMgICAgICJ2YXJfdGVtcCIgPSAiZGFya2dvbGRlbnJvZDEiCiMgICApKSArIAojICAgc2NhbGVfeF9jb250aW51b3VzKGJyZWFrcyA9IGFzLkRhdGUoYygiMjAyMy0wMS0wMSIsICIyMDIzLTA0LTAxIiwgIjIwMjMtMDctMDEiKSkpICsgCiMgICBnZ3RpdGxlKCJUd28gV2Vla3MiKSArIAojICAgbGFicyh5ID0gIlRlbXBlcmF0dXJlICjCsEMpIiwKIyAgICAgICAgeCA9ICIiKSArIAojICAgdGhlbWVfYncoYmFzZV9zaXplID0gMjApICsgCiMgICB0aGVtZShwYW5lbC5ncmlkID0gZWxlbWVudF9ibGFuaygpLAojICAgICAgICAgYXhpcy50ZXh0LnggPSBlbGVtZW50X3RleHQoYW5nbGUgPSAyNzAsIGhqdXN0ID0gMCwgdmp1c3QgPSAwLjUpKQojIAojIAojICMjIyBGT1VSIFdFRUtTCmZvdXJfd2Vla190ZW1wcyA9IGdldF9wcmVkaWN0b3JzKGRhaWx5X3ZhbHVlcyA9IGRhaWx5X3RlbXBfZGF0YSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcmF3X3RlbXAgPSB0ZW1wX2RhdGEsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG5fZGF5cyA9IDI4KQoKZm91cl93ZWVrX3Bsb3QgPSBmb3VyX3dlZWtfdGVtcHMgJT4lCiAgcGl2b3RfbG9uZ2VyKGNvbHMgPSBjKC1kYXRlKSwKICAgICAgICAgICAgICAgbmFtZXNfdG8gPSAicGFyYW1ldGVyIiwKICAgICAgICAgICAgICAgdmFsdWVzX3RvID0gInRlbXAiKSAlPiUKICBmaWx0ZXIocGFyYW1ldGVyICVpbiUgYygidHdlbnR5LWVpZ2h0X2RheV9tZWFuIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAidHdlbnR5LWVpZ2h0X2RheV9tZWQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICJ0d2VudHktZWlnaHRfZGF5X21heCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgInR3ZW50eS1laWdodF9kYXlfbWluIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAidHdlbnR5LWVpZ2h0X2RheV92YXIiLAogICAgICAgICAgICAgICAgICAgICAgICAgICJ0d2VudHktZWlnaHRfZGF5X3JhbmdlIikpICU+JQogIG11dGF0ZShwYXJhbWV0ZXIgPSBwYXN0ZSh3b3JkKHBhcmFtZXRlciwgc3RhcnQgPSAzLCBzZXAgPSBmaXhlZCgiXyIpKSwgIl90ZW1wIiwgc2VwID0gIiIpKSAlPiUKICBnZ3Bsb3QoYWVzKHggPSBkYXRlLCB5ID0gdGVtcCwgY29sb3VyID0gcGFyYW1ldGVyKSkgKwogIGdlb21fbGluZShsaW5ld2lkdGggPSAxKSArCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBjKAogICAgIm1lYW5fdGVtcCIgPSAib2xpdmVkcmFiMyIsCiAgICAibWVkX3RlbXAiID0gInNlYWdyZWVuMyIsCiAgICAibWF4X3RlbXAiID0gInRvbWF0byIsCiAgICAibWluX3RlbXAiID0gImRvZGdlcmJsdWUiLAogICAgInJhbmdlX3RlbXAiID0gImdvbGRlbnJvZDMiLAogICAgInZhcl90ZW1wIiA9ICJkYXJrZ29sZGVucm9kMSIKICApKSArCiAgc2NhbGVfeF9jb250aW51b3VzKGJyZWFrcyA9IGFzLkRhdGUoYygiMjAyMy0wMS0wMSIsICIyMDIzLTA0LTAxIiwgIjIwMjMtMDctMDEiKSkpICsKICBnZ3RpdGxlKCJGb3VyIFdlZWtzIikgKwogIGxhYnMoeSA9ICJUZW1wZXJhdHVyZSAowrBDKSIsCiAgICAgICB4ID0gIiIpICsKICB0aGVtZV9idyhiYXNlX3NpemUgPSAyMCkgKwogIHRoZW1lKHBhbmVsLmdyaWQgPSBlbGVtZW50X2JsYW5rKCksCiAgICAgICAgYXhpcy50ZXh0LnggPSBlbGVtZW50X3RleHQoYW5nbGUgPSAyNzAsIGhqdXN0ID0gMCwgdmp1c3QgPSAwLjUpKQojIAojIAojICMjIyBFSUdIVCBXRUVLUwojIGVpZ2h0X3dlZWtfdGVtcHMgPSBnZXRfcHJlZGljdG9ycyhkYWlseV92YWx1ZXMgPSBkYWlseV90ZW1wX2RhdGEsIAojICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByYXdfdGVtcCA9IHRlbXBfZGF0YSwgCiMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG5fZGF5cyA9IDU2KQojIAojIGVpZ2h0X3dlZWtfcGxvdCA9IGVpZ2h0X3dlZWtfdGVtcHMgJT4lIAojICAgcGl2b3RfbG9uZ2VyKGNvbHMgPSBjKC1kYXRlKSwKIyAgICAgICAgICAgICAgICBuYW1lc190byA9ICJwYXJhbWV0ZXIiLCAKIyAgICAgICAgICAgICAgICB2YWx1ZXNfdG8gPSAidGVtcCIpICU+JSAKIyAgIGZpbHRlcihwYXJhbWV0ZXIgJWluJSBjKCJmaWZ0eS1zaXhfZGF5X21lYW4iLAojICAgICAgICAgICAgICAgICAgICAgICAgICAgImZpZnR5LXNpeF9kYXlfbWVkIiwKIyAgICAgICAgICAgICAgICAgICAgICAgICAgICJmaWZ0eS1zaXhfZGF5X21heCIsIAojICAgICAgICAgICAgICAgICAgICAgICAgICAgImZpZnR5LXNpeF9kYXlfbWluIiwgCiMgICAgICAgICAgICAgICAgICAgICAgICAgICAiZmlmdHktc2l4X2RheV92YXIiLAojICAgICAgICAgICAgICAgICAgICAgICAgICAgImZpZnR5LXNpeF9kYXlfcmFuZ2UiKSkgJT4lIAojICAgbXV0YXRlKHBhcmFtZXRlciA9IHBhc3RlKHdvcmQocGFyYW1ldGVyLCBzdGFydCA9IDMsIHNlcCA9IGZpeGVkKCJfIikpLCAiX3RlbXAiLCBzZXAgPSAiIikpICU+JSAKIyAgIGdncGxvdChhZXMoeCA9IGRhdGUsIHkgPSB0ZW1wLCBjb2xvdXIgPSBwYXJhbWV0ZXIpKSArIAojICAgZ2VvbV9saW5lKGxpbmV3aWR0aCA9IDEpICsgCiMgICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcyA9IGMoCiMgICAgICJtZWFuX3RlbXAiID0gIm9saXZlZHJhYjMiLAojICAgICAibWVkX3RlbXAiID0gInNlYWdyZWVuMyIsCiMgICAgICJtYXhfdGVtcCIgPSAidG9tYXRvIiwgIAojICAgICAibWluX3RlbXAiID0gImRvZGdlcmJsdWUiLAojICAgICAicmFuZ2VfdGVtcCIgPSAiZ29sZGVucm9kMyIsCiMgICAgICJ2YXJfdGVtcCIgPSAiZGFya2dvbGRlbnJvZDEiCiMgICApKSArIAojICAgc2NhbGVfeF9jb250aW51b3VzKGJyZWFrcyA9IGFzLkRhdGUoYygiMjAyMy0wMS0wMSIsICIyMDIzLTA0LTAxIiwgIjIwMjMtMDctMDEiKSkpICsgCiMgICBnZ3RpdGxlKCJFaWdodCBXZWVrcyIpICsgCiMgICBsYWJzKHkgPSAiVGVtcGVyYXR1cmUgKMKwQykiLAojICAgICAgICB4ID0gIiIpICsgCiMgICB0aGVtZV9idyhiYXNlX3NpemUgPSAyMCkgKyAKIyAgIHRoZW1lKHBhbmVsLmdyaWQgPSBlbGVtZW50X2JsYW5rKCksCiMgICAgICAgICBheGlzLnRleHQueCA9IGVsZW1lbnRfdGV4dChhbmdsZSA9IDI3MCwgaGp1c3QgPSAwLCB2anVzdCA9IDAuNSkpCiMgCmdnYXJyYW5nZShkYWlseV9wbG90LCB3ZWVrX3Bsb3QsIGZvdXJfd2Vla19wbG90LCAKICAgICAgICAgIGNvbW1vbi5sZWdlbmQgPSBULCBucm93ID0gMSwgbGVnZW5kID0gImJvdHRvbSIpCmBgYAoKVGhlIGRpZmZlcmVudCB0aW1lIHBlcmlvZHMgZXhhbWluZWQgYnkgdGhpcyBjbGltYXRlIGRhdGEgaGlnaGxpZ2h0cyB0aGF0IHRoZSByZWxhdGlvbnNoaXAgYmV0d2VlbiBtaW5pbXVtIGFuZCBtYXhpbXVtIHRlbXBlcmF0dXJlcyBjaGFuZ2VzIGJhc2VkIG9uIHRoZSB3aW5kb3cgZXhhbWluZWQuIEZvciBleGFtcGxlLCBtaW5pbXVtIGFuZCBtYXhpbXVtIHRlbXBlcmF0dXJlcyBleHBlcmllbmNlZCBvdmVyIHdlZWtseSBpbnRlcnZhbHMgYXJlIGNsb3NlbHkgbGlua2VkLCB3aGVyZWFzIHRoZXJlIGlzIGEgZGlzdGluY3Qgc2Vhc29uYWwgY3ljbGUgaW4gdGhlIHJlbGF0aW9uc2hpcCBiZXR3ZWVuIG1pbmltdW0gYW5kIG1heGltdW0gdGVtcGVyYXR1cmVzIGV4cGVyaWVuY2VkIG92ZXIgcGVyaW9kcyBvZiBmb3VyIHdlZWtzLiAKCmBgYHtyfQpvbmVfd2Vla19kb3lfZGF0YSA9IHdlZWtfdGVtcHMgJT4lIAogIG11dGF0ZShkb3kgPSB5ZGF5KGRhdGUpKQoKb25lX3dlZWtfdGVtcF9jaXJjbGUgPSBnZ3Bsb3Qob25lX3dlZWtfZG95X2RhdGEsIGFlcyh4ID0gc2V2ZW5fZGF5X21lYW5fbWF4LCB5ID0gc2V2ZW5fZGF5X21lYW5fbWluLCBjb2xvdXIgPSBkb3kpKSArIAogIGdlb21fcG9pbnQoKSArIAogIHNjYWxlX2NvbG91cl9ncmFkaWVudDIoCiAgICBoaWdoID0gImRvZGdlcmJsdWU0IiwKICAgIG1pZCA9ICJjb3JhbDIiLAogICAgbG93ID0gImRvZGdlcmJsdWU0IiwKICAgIG1pZHBvaW50ID0gMTgyLjUpICsgCiAgbGFicyh4ID0gIk1heC4gVGVtcC4gKMKwQykiLAogICAgICAgeSA9ICJNaW4uIFRlbXAuICjCsEMpIikgKyAKICBsYWJzKHggPSAiTWF4LiBUZW1wLiAowrBDKSIsCiAgICAgICB5ID0gIk1pbi4gVGVtcC4gKMKwQykiKSArIAogIGdndGl0bGUoIk9uZSBXZWVrIikgKyAKICB0aGVtZV9tYXR0KCkKCmZvdXJfd2Vla19kb3lfZGF0YSA9IGZvdXJfd2Vla190ZW1wcyAlPiUgCiAgbXV0YXRlKGRveSA9IHlkYXkoZGF0ZSkpCgpmb3VyX3dlZWtfdGVtcF9jaXJjbGUgPSBnZ3Bsb3QoZm91cl93ZWVrX2RveV9kYXRhLCBhZXMoeCA9IGB0d2VudHktZWlnaHRfZGF5X21heGAsIHkgPSBgdHdlbnR5LWVpZ2h0X2RheV9taW5gLCBjb2xvdXIgPSBkb3kpKSArIAogIGdlb21fcG9pbnQoKSArIAogIHNjYWxlX2NvbG91cl9ncmFkaWVudDIoCiAgICBoaWdoID0gImRvZGdlcmJsdWU0IiwKICAgIG1pZCA9ICJjb3JhbDIiLAogICAgbG93ID0gImRvZGdlcmJsdWU0IiwKICAgIG1pZHBvaW50ID0gMTgyLjUpICsgCiAgbGFicyh4ID0gIk1heC4gVGVtcC4gKMKwQykiLAogICAgICAgeSA9ICJNaW4uIFRlbXAuICjCsEMpIikgKyAKICBnZ3RpdGxlKCJGb3VyIFdlZWsiKSArIAogIHRoZW1lX21hdHQoKQoKZ2dhcnJhbmdlKG9uZV93ZWVrX3RlbXBfY2lyY2xlLCBmb3VyX3dlZWtfdGVtcF9jaXJjbGUsCiAgICAgICAgICBjb21tb24ubGVnZW5kID0gVCwgbGVnZW5kID0gImJvdHRvbSIpCmBgYAoKVGhlIHRoZXJtYWwgZW52aXJvbm1lbnQgb3ZlciBhbnkgcGVyaW9kIG9mIHRpbWUgbWF5IGRyaXZlIHBhdHRlcm5zIGluIHRoZXJtYWwgYWNjbGltYXRpb24uIFRvIGV4cGxvcmUgdGhlIHBvdGVudGlhbCBlZmZlY3RzIG9mIGRpZmZlcmVudCBhY2NsaW1hdGlvbiB3aW5kb3dzLCB3ZSBleGFtaW5lZCB0aGUgY29ycmVsYXRpb24gYmV0d2VlbiB0aGVybWFsIGxpbWl0cyBhbmQgZGlmZmVyZW50IHJlcHJlc2VudGF0aW9ucyBvZiB0aGUgdGhlcm1hbCBlbnZpcm9ubWVudCBmb3IgZGlmZmVyZW50IHBlcmlvZHMgb2YgdGltZS4gU2hvd24gYmVsb3cgYXJlIHRoZSBjb3JyZWxhdGlvbiBjb2VmZmljaWVudHMgZm9yIHRoZXNlIHJlbGF0aW9uc2hpcHMuIEVhY2ggZmFjZXQgc2hvd3MgdGhlIHJlbGF0aW9uc2hpcCBmb3IgYSBkaWZmZXJlbnQgZGltZW5zaW9uIG9mIHRoZSB0aGVybWFsIGVudmlyb25tZW50LiBDb3JyZWxhdGlvbiBjb2VmZmljaWVudHMgYXJlIHBsb3R0ZWQgZm9yIGRpZmZlcmVudCBkdXJhdGlvbnMsIGZvciBzcGVjaWVzIHRoYXQgd2VyZSBjb2xsZWN0ZWQgbW9yZSB0aGFuIGZpdmUgdGltZXMuIE9ubHkgZGF0YSBmb3IgbWF0dXJlIGZlbWFsZSBjb3BlcG9kcyB3YXMgaW5jbHVkZWQuIAoKV2UgY2FuIHNlZSB0aGF0LCBpbiBnZW5lcmFsLCBjb3BlcG9kcyBhcmUgcmVzcG9uZGluZyB0byBwcm94aW1hdGUgY3VlcyBmcm9tIHRoZSB0aGVybWFsIGVudmlyb25tZW50LCB3aXRoIGNvcnJlbGF0aW9ucyBnZW5lcmFsbHkgZHJvcHBpbmcgb2ZmIHN1YnN0YW50aWFsbHkgYXMgYWNjbGltYXRpb24gd2luZG93IGR1cmF0aW9uIGluY3JlYXNlcy4gQW4gZXhjZXB0aW9uIGlzICpFcGlzY2h1cmEgbGFjdXN0cmlzKiwgd2hpY2ggYXBwZWFycyB0byBiZSByZXNwb25kaW5nIHRvIG1heGltdW0gdGVtcGVyYXR1cmVzIGV4cGVyaWVuY2VkIG92ZXIgYSAyMCBkYXkgdGltZSBwZXJpb2QuIAoKYGBge3J9CiMjIyBQdWxsaW5nIHByZWRpY3RvcnMgYW5kIG1lYXN1cmluZyBjb3JyZWxhdGlvbnMgZm9yIG11Y2ggZmluZXIgdGltZXNjYWxlczsgMS01NiBkYXlzCgpudW1fY29sbHMgPSBmdWxsX2RhdGEgJT4lIAogIGZpbHRlcihzZXggPT0gImZlbWFsZSIpICU+JSAKICBzZWxlY3QoY29sbGVjdGlvbl9kYXRlLCBzcF9uYW1lKSAlPiUgIAogIGRpc3RpbmN0KCkgJT4lICAKICBjb3VudChzcF9uYW1lKSAlPiUgCiAgZmlsdGVyKG4gPj0gNSkKCmNvcnJfdmFscyA9IGRhdGEuZnJhbWUoKQoKZHVyX3ZhbHMgPSBjKDE6NTApCmZvcihpIGluIGR1cl92YWxzKXsKICAKICBkdXJhdGlvbl90ZW1wcyA9IGdldF9wcmVkaWN0b3JzKGRhaWx5X3ZhbHVlcyA9IGRhaWx5X3RlbXBfZGF0YSwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByYXdfdGVtcCA9IHRlbXBfZGF0YSwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBuX2RheXMgPSBpKSAlPiUgCiAgICBmaWx0ZXIoZGF0ZSAlaW4lIGFzX2RhdGUodW5pcXVlKGZ1bGxfZGF0YSRjb2xsZWN0aW9uX2RhdGUpKSkKICAKICBjb3JyX2RhdGEgPSBmdWxsX2RhdGEgJT4lCiAgICBmaWx0ZXIoc3BfbmFtZSAlaW4lIG51bV9jb2xscyRzcF9uYW1lKSAlPiUgCiAgICBmaWx0ZXIoc2V4ID09ICJmZW1hbGUiKSAlPiUgCiAgICBtdXRhdGUoY29sbGVjdGlvbl9kYXRlID0gYXMuRGF0ZShjb2xsZWN0aW9uX2RhdGUpKSAlPiUgCiAgICBpbm5lcl9qb2luKGR1cmF0aW9uX3RlbXBzLCBqb2luX2J5KGNvbGxlY3Rpb25fZGF0ZSA9PSBkYXRlKSkgJT4lIAogICAgcGl2b3RfbG9uZ2VyKGNvbHMgPSBjKGNvbGxlY3Rpb25fdGVtcCwgY29udGFpbnMoImRheV8iKSksCiAgICAgICAgICAgICAgICAgdmFsdWVzX3RvID0gInZhbHVlIiwgCiAgICAgICAgICAgICAgICAgbmFtZXNfdG8gPSAicHJlZGljdG9yIikgJT4lICAKICAgIGdyb3VwX2J5KHNwX25hbWUsIHByZWRpY3RvcikgJT4lIAogICAgc3VtbWFyaXNlKGNvcnJlbGF0aW9uID0gY29yLnRlc3QoY3RtYXgsIHZhbHVlKSRlc3RpbWF0ZSwKICAgICAgICAgICAgICBwLnZhbHVlID0gY29yLnRlc3QoY3RtYXgsIHZhbHVlKSRwLnZhbHVlLAogICAgICAgICAgICAgIGNpX2xvdyA9IGNvci50ZXN0KGN0bWF4LCB2YWx1ZSkkY29uZi5pbnRbMV0sCiAgICAgICAgICAgICAgY2lfaGlnaCA9IGNvci50ZXN0KGN0bWF4LCB2YWx1ZSkkY29uZi5pbnRbMl0sCiAgICAgICAgICAgICAgLmdyb3VwcyA9ICJrZWVwIikgJT4lIAogICAgZmlsdGVyKHByZWRpY3RvciAhPSAiY29sbGVjdGlvbl90ZW1wIikgJT4lIAogICAgbXV0YXRlKHNpZyA9IGlmZWxzZShwLnZhbHVlIDwwLjA1LCAiU2lnLiIsICJOb24gU2lnLiIpKSAlPiUgCiAgICBzZXBhcmF0ZShwcmVkaWN0b3IsICJfZGF5XyIsIGludG8gPSBjKE5BLCAicGFyYW1ldGVyIikpICU+JSAKICAgIG11dGF0ZShkdXJhdGlvbiA9IGkpCiAgCiAgY29ycl92YWxzID0gYmluZF9yb3dzKGNvcnJfdmFscywgY29ycl9kYXRhKQp9Cgpjb2xsX2NvcnIgPSBmdWxsX2RhdGEgJT4lCiAgZmlsdGVyKHNwX25hbWUgJWluJSBudW1fY29sbHMkc3BfbmFtZSkgJT4lIAogIGZpbHRlcihzZXggPT0gImZlbWFsZSIpICU+JSAKICBncm91cF9ieShzcF9uYW1lKSAlPiUgCiAgc3VtbWFyaXNlKGNvcnJlbGF0aW9uID0gY29yLnRlc3QoY3RtYXgsIGNvbGxlY3Rpb25fdGVtcCkkZXN0aW1hdGUsCiAgICAgICAgICAgIHAudmFsdWUgPSBjb3IudGVzdChjdG1heCwgY29sbGVjdGlvbl90ZW1wKSRwLnZhbHVlLAogICAgICAgICAgICBjaV9sb3cgPSBjb3IudGVzdChjdG1heCwgY29sbGVjdGlvbl90ZW1wKSRjb25mLmludFsxXSwKICAgICAgICAgICAgY2lfaGlnaCA9IGNvci50ZXN0KGN0bWF4LCBjb2xsZWN0aW9uX3RlbXApJGNvbmYuaW50WzJdKSAlPiUgCiAgbXV0YXRlKHNpZyA9IGlmZWxzZShwLnZhbHVlIDwwLjA1LCAiU2lnLiIsICJOb24gU2lnLiIpKSAlPiUgCiAgbXV0YXRlKGR1cmF0aW9uID0gMCwKICAgICAgICAgcGFyYW1ldGVyID0gImNvbGxfdGVtcCIpCgpjb3JyX3ZhbHMgPSBjb3JyX3ZhbHMgJT4lICAKICBtdXRhdGUoZHVyYXRpb24gPSBhcy5udW1lcmljKGR1cmF0aW9uKSkgJT4lIAogIGJpbmRfcm93cyhjb2xsX2NvcnIpCgpgYGAKCmBgYHtyIGZpZy53aWR0aD0xMCwgZmlnLmhlaWdodD02fQpjb3JyX3ZhbHMgJT4lIAogIG11dGF0ZShwYXJhbWV0ZXIgPSBmY3RfcmVsZXZlbChwYXJhbWV0ZXIsIGMoIm1pbiIsICJtYXgiLCAicmFuZ2UiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIm1lYW4iLCAibWVkIiwgInZhciIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAibWVhbl9taW4iLCAibWVhbl9tYXgiLCAibWVhbl9yYW5nZSIpKSkgJT4lIAogIGdncGxvdChhZXMoeCA9IGR1cmF0aW9uLCB5ID0gY29ycmVsYXRpb24sIGNvbG91ciA9IHNwX25hbWUpKSArIAogIGZhY2V0X3dyYXAoLn5wYXJhbWV0ZXIpICsgCiAgZ2VvbV9obGluZSh5aW50ZXJjZXB0ID0gMCkgKyAKICBnZW9tX3BvaW50KHNpemUgPSAwLjkpICsgCiAgZ2VvbV9saW5lKGxpbmV3aWR0aCA9IDEuNSkgKyAKICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcyA9IHNwZWNpZXNfY29scykgKyAKICBsYWJzKHggPSAiRHVyYXRpb24gKGRheXMpIiwKICAgICAgIHkgPSAiQ29ycmVsYXRpb24iLCAKICAgICAgIGNvbG91ciA9ICJTcGVjaWVzIikgKyAKICB0aGVtZV9tYXR0X2ZhY2V0cygpCmBgYAoKU2hvd24gaGVyZSBhcmUgdGhlIHRvcCB0aHJlZSBmYWN0b3JzIGZvciBlYWNoIHNwZWNpZXMuIAoKYGBge3IgcHJlZGljdG9yLWNvcnJlbGF0aW9uc30KIyAKIyBjb3JyX3ZhbHMgPSBmdWxsX2RhdGEgJT4lCiMgICBmaWx0ZXIoc3BfbmFtZSAlaW4lIG51bV9jb2xscyRzcF9uYW1lKSAlPiUgCiMgICBmaWx0ZXIoc2V4ID09ICJmZW1hbGUiKSAlPiUgCiMgICBtdXRhdGUoY29sbGVjdGlvbl9kYXRlID0gYXMuRGF0ZShjb2xsZWN0aW9uX2RhdGUpKSAlPiUgCiMgICBmdWxsX2pvaW4odGVtcF9wcmVkaWN0b3JzLCBqb2luX2J5KGNvbGxlY3Rpb25fZGF0ZSA9PSBkYXRlKSkgJT4lIAojICAgcGl2b3RfbG9uZ2VyKGNvbHMgPSBjKGNvbGxlY3Rpb25fdGVtcCwgbWVhbl90ZW1wOnRhaWwobmFtZXMoLiksIDEpKSwKIyAgICAgICAgICAgICAgICB2YWx1ZXNfdG8gPSAidmFsdWUiLCAKIyAgICAgICAgICAgICAgICBuYW1lc190byA9ICJwcmVkaWN0b3IiKSAlPiUgIAojICAgZ3JvdXBfYnkoc3BfbmFtZSwgcHJlZGljdG9yKSAlPiUgCiMgICBzdW1tYXJpc2UoY29ycmVsYXRpb24gPSBjb3IudGVzdChjdG1heCwgdmFsdWUpJGVzdGltYXRlLAojICAgICAgICAgICAgIHAudmFsdWUgPSBjb3IudGVzdChjdG1heCwgdmFsdWUpJHAudmFsdWUsCiMgICAgICAgICAgICAgY2lfbG93ID0gY29yLnRlc3QoY3RtYXgsIHZhbHVlKSRjb25mLmludFsxXSwKIyAgICAgICAgICAgICBjaV9oaWdoID0gY29yLnRlc3QoY3RtYXgsIHZhbHVlKSRjb25mLmludFsyXSkgJT4lIAojICAgbXV0YXRlKHNpZyA9IGlmZWxzZShwLnZhbHVlIDwwLjA1LCAiU2lnLiIsICJOb24gU2lnLiIpKQoKY29ycl92YWxzICU+JSAgCiAgZmlsdGVyKHNpZyA9PSAiU2lnLiIpICU+JSAKICBkcm9wX25hKGNvcnJlbGF0aW9uKSAlPiUgCiAgZ3JvdXBfYnkoc3BfbmFtZSkgJT4lCiAgYXJyYW5nZShkZXNjKGNvcnJlbGF0aW9uKSkgJT4lIAogIHNsaWNlX2hlYWQobiA9IDMpICU+JSAKICBzZWxlY3QoIlNwZWNpZXMiID0gc3BfbmFtZSwgIlByZWRpY3RvciIgPSBwYXJhbWV0ZXIsICJEdXJhdGlvbiIgPSBkdXJhdGlvbiwgIkNvcnJlbGF0aW9uIiA9IGNvcnJlbGF0aW9uLCAiUC1WYWx1ZSIgPSBwLnZhbHVlKSAlPiUgCiAga25pdHI6OmthYmxlKGFsaWduID0gImMiKQpgYGAKClBoZW5vdHlwaWMgdmFyaWF0aW9uIChsaWtlIGFjY2xpbWF0aW9uIG9mIHRoZXJtYWwgbGltaXRzKSBpcyBhIHBoeXNpb2xvZ2ljYWwgcHJvY2Vzcy4gZGVwZW5kaW5nIG9uIHRoZSBtZWNoYW5pc3RpYyB1bmRlcnBpbm5pbmdzIChjaGFuZ2VzIGluIEhTUCBleHByZXNzaW9uLCBldGMuKSwgdGhlIGFtb3VudCBvZiB0aW1lIGl0IHRha2VzIGZvciBhbiBpbmRpdmlkdWFsIHRvIGFjY2xpbWF0ZSBtYXkgdmFyeSBiYXNlZCBvbiBib2R5IHNpemUgKGxhcmdlciBzcGVjaWVzLCBtb3JlIGNlbGxzLCBtb3JlIHRpbWUgcmVxdWlyZWQgdG8gYWNjbGltYXRlKS4gU2hvd24gaGVyZSBpcyB0aGUgZHVyYXRpb24gb2YgdGhlIGVudmlyb25tZW50YWwgYWNjbGltYXRpb24gd2luZG93IHRoZSBjb3BlcG9kcyBhcHBlYXIgdG8gYmUgcmVzcG9uZGluZyB0by4gIAoKYGBge3IgYWNjLWR1cmF0aW9uLXBsb3QsIGZpZy53aWR0aD03LCBmaWcuaGVpZ2h0PTR9Cm1lYW5fc2l6ZXMgPSBmdWxsX2RhdGEgJT4lIAogIGZpbHRlcihzZXggPT0gImZlbWFsZSIpICU+JSAKICBncm91cF9ieShzcF9uYW1lKSAlPiUgIAogIHN1bW1hcmlzZShtZWFuX3NpemUgPSBtZWFuKHNpemUsIG5hLnJtID0gVCkpCgpjb3JyX3ZhbHMgJT4lIAogIGdyb3VwX2J5KHNwX25hbWUpICU+JSAKICBmaWx0ZXIoY29ycmVsYXRpb24gPT0gbWF4KGNvcnJlbGF0aW9uKSkgJT4lICAKICBpbm5lcl9qb2luKG1lYW5fc2l6ZXMsIGJ5ID0gInNwX25hbWUiKSAlPiUgCiAgc2VsZWN0KHNwX25hbWUsIGR1cmF0aW9uLCBtZWFuX3NpemUpICU+JSAgCiAgZ2dwbG90KGFlcyh4ID0gbWVhbl9zaXplLCB5ID0gZHVyYXRpb24pKSArIAogIGdlb21fcG9pbnQoYWVzKGNvbG91ciA9IHNwX25hbWUpLCAKICAgICAgICAgICAgIHNpemUgPSA0KSArIAogIHNjYWxlX2NvbG91cl9tYW51YWwodmFsdWVzID0gc3BlY2llc19jb2xzKSArIAogIGxhYnMoeCA9ICJNZWFuIEZlbWFsZSBTaXplIChtbSkiLAogICAgICAgeSA9ICJBY2NsaW1hdGlvbiBEdXJhdGlvbiIsCiAgICAgICBjb2xvdXIgPSAiU3BlY2llcyIpICsgCiAgdGhlbWVfbWF0dCgpICsgCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gInJpZ2h0IikKYGBgCgoKIyMgVHJhaXQgVmFyaWF0aW9uIApgYGB7ciBjdG1heC1hbmQtc2l6ZS1zdW0tcGxvdCwgZmlnLndpZHRoPTIwLCBmaWcuaGVpZ2h0PTV9CiMgY3RtYXhfcGxvdCA9IGZ1bGxfZGF0YSAlPiUKIyAgIG11dGF0ZSggI3NwX25hbWUgPSBzdHJfcmVwbGFjZShzcF9uYW1lLCBwYXR0ZXJuID0gIiAiLAojICAgICAjICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcmVwbGFjZW1lbnQgPSAiXG4iKSwKIyAgICAgc3BfbmFtZSA9IGZjdF9yZW9yZGVyKHNwX25hbWUsIGN0bWF4LCBtZWFuKSkgJT4lCiMgICBnZ3Bsb3QoYWVzKHkgPSBzcF9uYW1lLCB4ID0gY3RtYXgpKSArCiMgICBnZW9tX3BvaW50KGFlcyhjb2xvdXI9IHNwX25hbWVfc3ViKSwKIyAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuMyksCiMgICAgICAgICAgICAgIHNpemUgPSA0KSArCiMgICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcyA9IHNwZWNpZXNfY29scykgKwojICAgeGxhYihOVUxMKSArCiMgICBsYWJzKHkgPSAiIiwKIyAgICAgICAgeCA9ICJDVG1heCAowrBDKSIsCiMgICAgICAgIGNvbG91ciA9ICJHcm91cCIpICsKIyAgIHRoZW1lX21hdHQoKSArCiMgICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpCiMgCiMgc2l6ZV9wbG90ID0gZnVsbF9kYXRhICU+JQojICAgbXV0YXRlKHNwX25hbWUgPSBmY3RfcmVvcmRlcihzcF9uYW1lLCBjdG1heCwgbWVhbikpICU+JQojICAgZ2dwbG90KGFlcyh5ID0gc3BfbmFtZSwgeCA9IHNpemUpKSArCiMgICBnZW9tX3BvaW50KGFlcyhjb2xvdXI9IHNwX25hbWVfc3ViKSwKIyAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuMyksCiMgICAgICAgICAgICAgIHNpemUgPSA0KSArCiMgICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcyA9IHNwZWNpZXNfY29scykgKwojICAgbGFicyh4ID0gIlByb3NvbWUgTGVuZ3RoIChtbSkiLAojICAgICAgICB5ID0gIiIsCiMgICAgICAgIGNvbG91ciA9ICJHcm91cCIpICsKIyAgIGd1aWRlcyhjb2xvciA9IGd1aWRlX2xlZ2VuZChuY29sID0gMSkpICsKIyAgIHRoZW1lX21hdHQoYmFzZV9zaXplID0gKSArCiMgICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAicmlnaHQiLAojICAgICAgICAgYXhpcy50ZXh0LnkgPSBlbGVtZW50X2JsYW5rKCksCiMgICAgICAgICBwbG90Lm1hcmdpbiA9IG1hcmdpbigwLCAwLCAwLCAwLCJjbSIpKQojIAojIHRyYWl0X3Bsb3QgPSBjdG1heF9wbG90ICsgc2l6ZV9wbG90CiMgdHJhaXRfcGxvdApgYGAKClNob3duIGJlbG93IGFyZSB0aGUgY2x1dGNoIHNpemUgZGlzdHJpYnV0aW9ucyBmb3IgdGhlIHRocmVlIGRpYXB0b21paWQgc3BlY2llcywgd2hpY2ggcHJvZHVjZSBlZ2cgc2FjcyB0aGF0IGFsbG93IGZvciBlYXN5IHF1YW50aWZpY2F0aW9uIG9mIGZlY3VuZGl0eS4gCgpgYGB7ciBmZWN1bmRpdHktaGlzdG9ncmFtLCBmaWcud2lkdGg9NywgZmlnLmhlaWdodD0xMH0KZnVsbF9kYXRhICU+JSAgCiAgZHJvcF9uYShmZWN1bmRpdHkpICU+JSAgCiAgZ2dwbG90KGFlcyh4ID0gZmVjdW5kaXR5LCBmaWxsID0gc3BfbmFtZV9zdWIpKSArIAogIGZhY2V0X3dyYXAoLn5zcF9uYW1lX3N1YiwgbmNvbCA9IDEpICsgCiAgZ2VvbV9oaXN0b2dyYW0oYmlud2lkdGggPSAyKSArIAogIHNjYWxlX2ZpbGxfbWFudWFsKHZhbHVlcyA9IHNwZWNpZXNfY29scykgKyAKICBsYWJzKHggPSAiRmVjdW5kaXR5ICgjIEVnZ3MpIikgKwogIHRoZW1lX21hdHRfZmFjZXRzKCkgKyAKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpCmBgYAoKT25lIG9mIHRoZSBtYWluIGFpbXMgb2YgdGhpcyBwcm9qZWN0IGlzIHRvIGV4YW1pbmUgdGhlIHBhdHRlcm5zIGFuZCBwcm9jZXNzZXMgZHJpdmluZyB2YXJpYXRpb24gaW4gdXBwZXIgdGhlcm1hbCBsaW1pdHMgYWNyb3NzIHRoZXNlIHNwZWNpZXMgb2YgY29wZXBvZHMuIAoKIyMjIFZhcmlhdGlvbiB3aXRoIHRlbXBlcmF0dXJlIAoKV2UgZXhwZWN0IG9uZSBvZiB0aGUgcHJpbWFyeSBkcml2ZXJzIG9mIGNvcGVwb2QgdGhlcm1hbCBsaW1pdHMgdG8gYmUgdGVtcGVyYXR1cmUuIFRoZSBjb3JyZWxhdGlvbiBhbmFseXNpcyBoYXMgc2hvd24gdGhhdCB0aGUgY29wZXBvZHMgYXJlIGdlbmVyYWxseSAoYWx0aG91Z2ggbm90IGFsd2F5cykgcmVzcG9uZGluZyB0byB0aGUgcmVjZW50IHRoZXJtYWwgZW52aXJvbm1lbnQuIFNob3duIGJlbG93IGFyZSB0aGVybWFsIGxpbWl0cywgYm9keSBzaXplLCBhbmQgZmVjdW5kaXR5IHZhbHVlcyBwbG90dGVkIGFnYWluc3QgdGhlIHRlbXBlcmF0dXJlIGF0IHRoZSB0aW1lIG9mIGNvbGxlY3Rpb24uIEFsc28gc2hvd24gaXMgd2FybWluZyB0b2xlcmFuY2UsIGNhbGN1bGF0ZWQgYXMgdGhlIGRpZmZlcmVuY2UgYmV0d2VlbiB1cHBlciB0aGVybWFsIGxpbWl0IGFuZCB0aGUgY29sbGVjdGlvbiB0ZW1wZXJhdHVyZS4gCgpXZSBnZW5lcmFsbHkgc2VlIGFuIGluY3JlYXNlIGluIHRoZXJtYWwgbGltaXRzIHdpdGggaW5jcmVhc2luZyBjb2xsZWN0aW9uIHRlbXBlcmF0dXJlLCBhIHNsaWdodCBkZWNyZWFzZSBpbiBib2R5IHNpemUsIGFuZCB2YXJpYWJsZSByZWxhdGlvbnNoaXBzIGJldHdlZW4gdGVtcGVyYXR1cmUgYW5kIGZlY3VuZGl0eS4gQWxsIHNwZWNpZXMgbWFpbnRhaW5lZCBzb21lIGRlZ3JlZSBvZiBidWZmZXIgYmV0d2VlbiBlbnZpcm9ubWVudGFsIHRlbXBlcmF0dXJlcyBhbmQgdXBwZXIgdGhlcm1hbCBsaW1pdHMsIGJ1dCAqRXBpc2NodXJhKiBhbmQgKkwuIG1pbnV0dXMqIGFwcHJvYWNoZWQgdGhlaXIgdXBwZXIgdGhlcm1hbCBsaW1pdHMgZHVyaW5nIHRoZSB3YXJtZXN0IGNvbGxlY3Rpb25zIGR1cmluZyB0aGUgc3VtbWVyLiAKCmBgYHtyIHRyYWl0LWNvbGwtdGVtcC1wbG90cywgZmlnLndpZHRoPTE1LCBmaWcuaGVpZ2h0PTEwfQpjdG1heF90ZW1wID0gZ2dwbG90KGZ1bGxfZGF0YSwgYWVzKHggPSBjb2xsZWN0aW9uX3RlbXAsIHkgPSBjdG1heCwgY29sb3VyID0gc3BfbmFtZSkpICsgCiAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwgbGluZXdpZHRoID0gMykgKwogIGdlb21fcG9pbnQoc2l6ZSA9IDMpICsgCiAgbGFicyh4ID0gIkNvbGxlY3Rpb24gVGVtcGVyYXR1cmUgKMKwQykiLCAKICAgICAgIHkgPSAiQ1RtYXggKMKwQykiLAogICAgICAgY29sb3VyID0gIlNwZWNpZXMiKSArIAogIHNjYWxlX2NvbG91cl9tYW51YWwodmFsdWVzID0gc3BlY2llc19jb2xzKSArIAogIHRoZW1lX21hdHQoKSArIAogIHRoZW1lKGxlZ2VuZC5wb3NpdGlvbiA9ICJyaWdodCIpCgpzaXplX3RlbXAgPSBnZ3Bsb3QoZmlsdGVyKGZ1bGxfZGF0YSwgc2V4ICE9ICJqdXZlbmlsZSIpLCBhZXMoeCA9IGNvbGxlY3Rpb25fdGVtcCwgeSA9IHNpemUsIGNvbG91ciA9IHNwX25hbWUpKSArIAogIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsIGxpbmV3aWR0aCA9IDMpICsKICBnZW9tX3BvaW50KHNpemUgPSAzKSArIAogIGxhYnMoeCA9ICJDb2xsZWN0aW9uIFRlbXBlcmF0dXJlICjCsEMpIiwgCiAgICAgICB5ID0gIkxlbmd0aCAobW0pIiwKICAgICAgIGNvbG91ciA9ICJTcGVjaWVzIikgICsgCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBzcGVjaWVzX2NvbHMpICsgCiAgdGhlbWVfbWF0dCgpICsgCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gInJpZ2h0IikKCnd0X3RlbXAgPSBnZ3Bsb3QoZnVsbF9kYXRhLCBhZXMoeCA9IGNvbGxlY3Rpb25fdGVtcCwgeSA9IHdhcm1pbmdfdG9sLCBjb2xvdXIgPSBzcF9uYW1lKSkgKyAKICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLCBsaW5ld2lkdGggPSAzKSArCiAgZ2VvbV9wb2ludChzaXplID0gMykgKyAKICBsYWJzKHggPSAiQ29sbGVjdGlvbiBUZW1wZXJhdHVyZSAowrBDKSIsIAogICAgICAgeSA9ICJXYXJtaW5nIFRvbGVyYW5jZSAowrBDKSIsCiAgICAgICBjb2xvdXIgPSAiU3BlY2llcyIpICArIAogIHNjYWxlX2NvbG91cl9tYW51YWwodmFsdWVzID0gc3BlY2llc19jb2xzKSArIAogIHRoZW1lX21hdHQoKSArIAogIHRoZW1lKGxlZ2VuZC5wb3NpdGlvbiA9ICJyaWdodCIpCgplZ2dzX3RlbXAgPSBnZ3Bsb3QoZnVsbF9kYXRhLCBhZXMoeCA9IGNvbGxlY3Rpb25fdGVtcCwgeSA9IGZlY3VuZGl0eSwgY29sb3VyID0gc3BfbmFtZSkpICsgCiAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwgbGluZXdpZHRoID0gMykgKwogIGdlb21fcG9pbnQoc2l6ZSA9IDMpICsgCiAgbGFicyh4ID0gIkNvbGxlY3Rpb24gVGVtcGVyYXR1cmUgKMKwQykiLCAKICAgICAgIHkgPSAiRmVjdW5kaXR5ICgjIEVnZ3MpIiwKICAgICAgIGNvbG91ciA9ICJTcGVjaWVzIikgICsgCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBzcGVjaWVzX2NvbHMpICsgCiAgdGhlbWVfbWF0dCgpICsgCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gInJpZ2h0IikKCmdnYXJyYW5nZShjdG1heF90ZW1wLCBzaXplX3RlbXAsIHd0X3RlbXAsIGVnZ3NfdGVtcCwgCiAgICAgICAgICBjb21tb24ubGVnZW5kID0gVCwgbGVnZW5kID0gInJpZ2h0IikKYGBgCgpgYGB7ciBmaWcud2lkdGg9NywgZmlnLmhlaWdodD01fQpmdWxsX2RhdGEgJT4lIAogICNmaWx0ZXIoc2V4ID09ICJmZW1hbGUiKSAlPiUgIAogIGdyb3VwX2J5KHNwX25hbWUpICU+JSBmaWx0ZXIobigpID4gNSkgJT4lIGZpbHRlcighc3RyX2RldGVjdChzcF9uYW1lLCBwYXR0ZXJuID0gImtpbmR0aSIpKSAlPiUgCiAgZ2dwbG90KGFlcyh4ID0gY29sbGVjdGlvbl90ZW1wLCB5ID0gY3RtYXgsIGNvbG91ciA9IHNwX25hbWUpKSArIAogIGZhY2V0X3dyYXAoc3BfbmFtZX4uKSArIAogIGdlb21fcG9pbnQoc2l6ZSA9IDIsIGFscGhhID0gMC44KSArIAogIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsIHNlID0gRiwgbGluZXdpZHRoID0gMikgKyAKICBsYWJzKHggPSAiQ29sbGVjdGlvbiBUZW1wLiAowrBDKSIsIAogICAgICAgeSA9ICJDVG1heCAowrBDKSIpICsgCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBzcGVjaWVzX2NvbHMpICsgCiAgdGhlbWVfbWF0dCgpICsgCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gIm5vbmUiKQpgYGAKClRlbXBlcmF0dXJlIGRlcGVuZGVuY2UgaXMgcmVsYXRpdmVseSB3ZWFrIGluICpMLiBzaWNpbGlzKiwgZXNwZWNpYWxseSBhdCBjb29sZXIgdGVtcGVyYXR1cmVzLiBXZSB3aWxsIHJldHVybiB0byB0aGlzIGZlYXR1cmUgbGF0ZXIgaW4gdGhlIHJlcG9ydCwgYnV0IGZvciBub3cgd2Ugd2lsbCBub3RlIHRoYXQgdGhlcmUgYXJlIHR3byBzaXplIG1vcnBocyBpbiB0aGlzIHNwZWNpZXMsIHdoaWNoIGFwcGVhciB0byByZXNwb25kIGRpZmZlcmVudGx5IHRvIGRlY3JlYXNlcyBpbiB0ZW1wZXJhdHVyZS4gVGhlcmUgYXJlIHNpZ25pZmljYW50IGRpZmZlcmVuY2VzIGJldHdlZW4gdGhlIG1vcnBocyBhbmQgaG93IHRlbXBlcmF0dXJlIGFmZmVjdHMgQ1RtYXguIAoKYGBge3J9Cm1vcnBoX2RhdGEgPSBmdWxsX2RhdGEgJT4lIAogIGZpbHRlcihzZXggPT0gImZlbWFsZSIgJiBzcGVjaWVzID09ICJsZXB0b2RpYXB0b211c19zaWNpbGlzIikgJT4lICBtdXRhdGUoc3BfbmFtZSA9IGNhc2Vfd2hlbigKICAgIHNwX25hbWUgPT0gIkxlcHRvZGlhcHRvbXVzIHNpY2lsaXMiICYgc2l6ZSA+PSAwLjg5IH4gIkxhcmdlIiwKICAgIHNwX25hbWUgPT0gIkxlcHRvZGlhcHRvbXVzIHNpY2lsaXMiICYgc2l6ZSA8IDAuODkgfiAiU21hbGwiLAogICAgLmRlZmF1bHQgPSBzcF9uYW1lCiAgKSkKCgpnZ3Bsb3QobW9ycGhfZGF0YSwgYWVzKHggPSBjb2xsZWN0aW9uX3RlbXAsIHkgPSBjdG1heCwgY29sb3VyID0gc3BfbmFtZSkpICsgCiAgZ2VvbV9wb2ludChzaXplID0gMiwgYWxwaGEgPSAwLjgpICsgCiAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwgc2UgPSBULCBsaW5ld2lkdGggPSAyKSArIAogIGxhYnMoeCA9ICJDb2xsZWN0aW9uIFRlbXAuICjCsEMpIiwgCiAgICAgICB5ID0gIkNUbWF4ICjCsEMpIikgKyAKICB0aGVtZV9tYXR0KCkgKyAKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpCgptb3JwaC5tb2RlbCA9IGxtKGRhdGEgPSBtb3JwaF9kYXRhLCAKICAgICAgICAgICAgICAgICBjdG1heCB+IGNvbGxlY3Rpb25fdGVtcCAqIHNwX25hbWUpCgprbml0cjo6a2FibGUoY2FyOjpBbm92YShtb3JwaC5tb2RlbCwgdHlwZSA9ICJJSUkiLCB0ZXN0ID0gIkYiKSkKCnN1bW1hcnkobW9ycGgubW9kZWwpCgptb3JwaC5lbSA9IGVtbWVhbnM6OmVtdHJlbmRzKG1vcnBoLm1vZGVsLCAic3BfbmFtZSIsIHZhciA9ICJjb2xsZWN0aW9uX3RlbXAiKQpwYWlycyhtb3JwaC5lbSkKYGBgCgpgYGB7ciBjdG1heC1yYW5nZS1wbG90LCBpbmNsdWRlID0gRn0KZnVsbF9kYXRhICU+JSAgCiAgZmlsdGVyKHNleCA9PSAiZmVtYWxlIikgJT4lIAogIGdyb3VwX2J5KHNwX25hbWUsIGNvbGxlY3Rpb25fZGF0ZSwgY29sbGVjdGlvbl90ZW1wKSAlPiUgIAogIHN1bW1hcmlzZSgiY3RtYXhfcmFuZ2UiID0gbWF4KGN0bWF4KSAtIG1pbihjdG1heCksCiAgICAgICAgICAgICJjdG1heF92YXIiID0gdmFyKGN0bWF4KSwKICAgICAgICAgICAgInNhbXBsZV9zaXplIiA9IG4oKSkgJT4lIAogIHVuZ3JvdXAoKSAlPiUgCiAgZ3JvdXBfYnkoc3BfbmFtZSkgJT4lIAogIGZpbHRlcihzcF9uYW1lICE9ICJMZXB0b2RvcmEga2luZHRpIikgJT4lIAogIGZpbHRlcihzYW1wbGVfc2l6ZSA+IDMpICU+JSAKICBnZ3Bsb3QoYWVzKHggPSBjb2xsZWN0aW9uX3RlbXAsIHkgPSBjdG1heF92YXIsIGNvbG91ciA9IHNwX25hbWUpKSArIAogIGZhY2V0X3dyYXAoc3BfbmFtZX4uKSArIAogIGdlb21fcG9pbnQoKSArIAogIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsIGNvbG91ciA9ICJibGFjayIpICsgCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBzcGVjaWVzX2NvbHMpICsgCiAgdGhlbWVfbWF0dF9mYWNldHMoKQpgYGAKCgpgYGB7ciBjdG1heC1jb2xsLXRlbXAtbW9kZWwsIGluY2x1ZGUgPSBGfQojIGFkdWx0X2RhdGEgPSBmdWxsX2RhdGEgJT4lIAojICAgZmlsdGVyKHNleCA9PSAiZmVtYWxlIikKbW9kZWxfZGF0YSA9IGZ1bGxfZGF0YSAlPiUgIAogIGRyb3BfbmEoc2l6ZSwgY3RtYXgpICU+JSAgCiAgbXV0YXRlKHRlbXBfY2VudCA9IHNjYWxlKGNvbGxlY3Rpb25fdGVtcCwgY2VudGVyID0gVCwgc2NhbGUgPSBGKSwKICAgICAgICAgc2l6ZV9jZW50ID0gc2NhbGUoc2l6ZSwgY2VudGVyID0gVCwgc2NhbGUgPSBGKSkKCmN0bWF4X3RlbXAubW9kZWwgPSBsbShkYXRhID0gbW9kZWxfZGF0YSwgY3RtYXggfiB0ZW1wX2NlbnQgKiBzcF9uYW1lKQpzaXplX3RlbXAubW9kZWwgPSBsbShkYXRhID0gbW9kZWxfZGF0YSwgc2l6ZSB+IGNvbGxlY3Rpb25fdGVtcCAqIHNwX25hbWUpCgprbml0cjo6a2FibGUoY2FyOjpBbm92YShjdG1heF90ZW1wLm1vZGVsKSkKCmN0bWF4X3Jlc2lkcyA9IGNiaW5kKG1vZGVsX2RhdGEsICJyZXNpZHMiID0gY3RtYXhfdGVtcC5tb2RlbCRyZXNpZHVhbHMsICJzaXplX3Jlc2lkcyIgPSBzaXplX3RlbXAubW9kZWwkcmVzaWR1YWxzKQoKYGBgCgpDb3BlcG9kcyBzcGVudCBzZXZlcmFsIGRheXMgaW4gbGFiIGR1cmluZyBleHBlcmltZW50cy4gU2hvd24gYmVsb3cgYXJlIHRoZSBDVG1heCByZXNpZHVhbHMgKHRha2VuIGZyb20gYSBtb2RlbCBvZiBDVG1heCBhZ2FpbnN0IGNvbGxlY3Rpb24gdGVtcGVyYXR1cmUpIHBsb3R0ZWQgYWdhaW5zdCB0aGUgdGltZSBzcGVudCBpbiBsYWIgYmVmb3JlIG1lYXN1cmVtZW50cyB3ZXJlIG1hZGUuIEluZGl2aWR1YWwgcmVncmVzc2lvbnMgYXJlIHNob3duIGZvciB0aGUgcmVzaWR1YWxzIGFnYWluc3QgZGF5cyBpbiBsYWIgZm9yIGVhY2ggY29sbGVjdGlvbi4gV2UgY2FuIHNlZSBjbGVhcmx5IHRoYXQgdGhlcm1hbCBsaW1pdHMgYXJlIGZhaXJseSBzdGFibGUgb3ZlciB0aW1lLiAKCmBgYHtyIGN0bWF4LXRpbWUtaW4tbGFiLCBmaWcud2lkdGg9MTUsIGZpZy5oZWlnaHQ9MTB9CmdncGxvdChjdG1heF9yZXNpZHMsIGFlcyh4ID0gZGF5c19pbl9sYWIsIHkgPSByZXNpZHMsIGNvbG91ciA9IHNwX25hbWUsIGdyb3VwID0gY29sbGVjdGlvbl9kYXRlKSkgKyAKICBmYWNldF93cmFwKHNwX25hbWV+LikgKyAKICBnZW9tX3BvaW50KHNpemUgPSA0LCBhbHBoYSA9IDAuNSkgKyAKICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLCBzZSA9IEYsIGxpbmV3aWR0aCA9IDEpICsgCiAgI3NjYWxlX3hfY29udGludW91cyhicmVha3MgPSBjKDA6NSkpICsgCiAgbGFicyh4ID0gIkRheXMgaW4gbGFiIiwgCiAgICAgICB5ID0gIkNUbWF4IFJlc2lkdWFscyIpICsgCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBzcGVjaWVzX2NvbHMpICsgCiAgdGhlbWVfbWF0dF9mYWNldHMoKSArIAogIHRoZW1lKGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikKYGBgCgpgYGB7ciBpbmNsdWRlID0gRn0KY3RtYXhfcmVzaWRzICU+JSAKICBmaWx0ZXIobGlwaWRzICE9ICJ1bmNlcnRhaW4iKSAlPiUgCiAgZ2dwbG90KGFlcyh4ID0gbGlwaWRzLCB5ID0gcmVzaWRzLCBjb2xvdXIgPSBzcF9uYW1lKSkgKyAKICBmYWNldF93cmFwKHNwX25hbWV+LikgKyAKICBnZW9tX3BvaW50KHNpemUgPSA0LCBhbHBoYSA9IDAuNSkgKyAKICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLCBzZSA9IEYsIGxpbmV3aWR0aCA9IDEpICsgCiAgI3NjYWxlX3hfY29udGludW91cyhicmVha3MgPSBjKDA6NSkpICsgCiAgbGFicyh4ID0gIkxpcGlkcyIsIAogICAgICAgeSA9ICJDVG1heCBSZXNpZHVhbHMiKSArIAogIHNjYWxlX2NvbG91cl9tYW51YWwodmFsdWVzID0gc3BlY2llc19jb2xzKSArIAogIHRoZW1lX21hdHRfZmFjZXRzKCkgKyAKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpCmBgYAoKYGBge3IgQVJSLWxpbWl0cy1wbG90LCBmaWcud2lkdGg9OCwgZmlnLmhlaWdodD02fQpmdWxsLm1vZGVsID0gbG1lNDo6bG1lcihkYXRhID0gbW9kZWxfZGF0YSwKICAgICAgICAgICAgICAgICAgICAgICAgY3RtYXggfiBzZXggKyB0ZW1wX2NlbnQgKyBzaXplX2NlbnQgKwogICAgICAgICAgICAgICAgICAgICAgICAgICgxICsgZGF5c19pbl9sYWIgKyB0ZW1wX2NlbnQgKyBzaXplX2NlbnR8c3BfbmFtZSkpCgpjYXI6OkFub3ZhKGZ1bGwubW9kZWwpCgpmaXhlZCA9IGZpeGVmKGZ1bGwubW9kZWwpCgptb2RlbF9jb2VmcyA9IGNvZWZmaWNpZW50cyhmdWxsLm1vZGVsKSRgc3BfbmFtZWAgJT4lICAKICByb3duYW1lc190b19jb2x1bW4odmFyID0gInNwZWNpZXMiKSAlPiUgCiAgc2VwYXJhdGUoc3BlY2llcywgaW50byA9IGMoInNwZWNpZXMiKSwgc2VwID0gIjoiKSAlPiUgCiAgc2VsZWN0KHNwZWNpZXMsICJpbnRlcmNlcHQiID0gIihJbnRlcmNlcHQpIiwgdGVtcF9jZW50LCBzaXplX2NlbnQsIGRheXNfaW5fbGFiKQoKZ2dwbG90KG1vZGVsX2NvZWZzLCBhZXMoeCA9IGludGVyY2VwdCwgeSA9IHRlbXBfY2VudCkpICsgCiAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwgY29sb3VyID0gImJsYWNrIikgKwogIGdlb21fcG9pbnQoYWVzKGNvbG91ciA9IHNwZWNpZXMpLAogICAgICAgICAgICAgc2l6ZSA9IDYpICsgCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBzcGVjaWVzX2NvbHMpICsgCiAgbGFicyh4ID0gIlNwZWNpZXMgSW50ZXJjZXB0IiwgCiAgICAgICB5ID0gIkFSUiIpICsKICB0aGVtZV9tYXR0KCkgKyAKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAicmlnaHQiKQpgYGAKCgpUaGUgdGVybSAiYWNjbGltYXRpb24gcmVzcG9uc2UgcmF0aW8iIGlzIG9mdGVuIHVzZWQgdG8gZGVzY3JpYmUgdGhlIGVmZmVjdCBvZiB0ZW1wZXJhdHVyZSBvbiB0aGVybWFsIGxpbWl0cy4gVGhlIEFSUiBpcyBjYWxjdWxhdGVkIGFzIHRoZSBjaGFuZ2UgaW4gdGhlcm1hbCBsaW1pdHMgcGVyIGRlZ3JlZSBjaGFuZ2UgaW4gYWNjbGltYXRpb24gdGVtcGVyYXR1cmUuIEZvciBvdXIgZGF0YSwgd2Ugd2lsbCBlc3RpbWF0ZSBBUlIgYXMgdGhlIHNsb3BlIG9mIENUbWF4IGFnYWluc3QgY29sbGVjdGlvbiB0ZW1wZXJhdHVyZS4gVGhlc2Ugc2xvcGVzIHdlcmUgdGFrZW4gZnJvbSBhIHJlZ3Jlc3Npb24gb2YgQ1RtYXggYWdhaW5zdCBjb2xsZWN0aW9uIHRlbXBlcmF0dXJlIGFuZCBib2R5IHNpemUuIFR3byBkaWZmZXJlbnQgbW9kZWwgdHlwZXMgd2VyZSB1c2VkLCBhIHNpbXBsZSBsaW5lYXIgcmVncmVzc2lvbiBhbmQgYSBtaXhlZCBlZmZlY3RzIG1vZGVsLiBUaGUgZXN0aW1hdGVkIEFSUiB2YWx1ZXMgd2VyZSBnZW5lcmFsbHkgaGlnaGx5IHNpbWlsYXIgYmV0d2VlbiB0aGUgbW9kZWwgdHlwZXMgdXNlZC4KCmBgYHtyIGFyci1jb21wLXBsb3QsIGZpZy53aWR0aD04LCBmaWcuaGVpZ2h0PTEwLCBpbmNsdWRlID0gRn0KY29lZl9tb2RlbF9kYXRhID0gZnVsbF9kYXRhICU+JSAKICBncm91cF9ieShzcF9uYW1lLCBzZXgpICU+JSAKICBmaWx0ZXIobigpID4gMyAmICFzdHJfZGV0ZWN0KHNwX25hbWUsIHBhdHRlcm4gPSAia2luZHRpIikpIAoKY29lZl9uID0gZnVsbF9kYXRhICU+JSAKICBncm91cF9ieShzcF9uYW1lLCBzZXgpICU+JSAKICBmaWx0ZXIobigpID4gNSkgJT4lIAogIHN1bW1hcmlzZShzYW1wbGVfbiA9IG4oKSwgCiAgICAgICAgICAgIG1lYW5fY3RtYXggPSBtZWFuKGN0bWF4KSkKCkFSUl92YWxzID0gY29lZl9tb2RlbF9kYXRhICU+JSAKICBkbyhicm9vbTo6dGlkeShsbShjdG1heCB+IGNvbGxlY3Rpb25fdGVtcCArIHNpemUsIGRhdGEgPSAuKSkpICU+JSAKICBmaWx0ZXIodGVybSA9PSAiY29sbGVjdGlvbl90ZW1wIikgJT4lIAogIHNlbGVjdChzcF9uYW1lLCBzZXgsICJBUlIiID0gZXN0aW1hdGUsIHN0ZC5lcnJvcikgJT4lIAogIGFycmFuZ2UoQVJSKSAlPiUgCiAgaW5uZXJfam9pbihjb2VmX24sIGJ5ID0gYygic3BfbmFtZSIsICJzZXgiKSkKCkFSUl92YWxzICU+JSAKICBzZWxlY3QoIlNwZWNpZXMiID0gc3BfbmFtZSwgCiAgICAgICAgICJHcm91cCIgPSBzZXgsIAogICAgICAgICAiTiIgPSBzYW1wbGVfbiwKICAgICAgICAgQVJSLCAKICAgICAgICAgIkVycm9yIiA9IHN0ZC5lcnJvcikgJT4lIAogIGtuaXRyOjprYWJsZSgpCgptbGVfY29lZnMgPSBjb2VmZmljaWVudHMoZnVsbC5tb2RlbCkkYHNwX25hbWVgICU+JSAKICBtdXRhdGUoImdyb3VwIiA9IHJvd25hbWVzKC4pKSAlPiUgCiAgc2VsZWN0KGdyb3VwLCAiaW50ZXJjZXB0IiA9ICIoSW50ZXJjZXB0KSIsICJBUlIiID0gdGVtcF9jZW50LCBzaXplX2NlbnQpICU+JSAKICByZW1vdmVfcm93bmFtZXMoKQoKbWxlX0FSUiA9IG1sZV9jb2VmcyAlPiUgIAogIHNlbGVjdChzcF9uYW1lID0gZ3JvdXAsIEFSUikgJT4lIAogIG11dGF0ZSgibW9kZWwiID0gIm1peGVkIGVmZmVjdHMiKSAgJT4lIAogIGlubmVyX2pvaW4oY29lZl9uLCBieSA9IGMoInNwX25hbWUiKSkKCkFSUl9jb21wID0gYmluZF9yb3dzKG1sZV9BUlIsIAogICAgICAgICAgICAgICAgICAgICBtdXRhdGUoQVJSX3ZhbHMsICJtb2RlbCIgPSAibGluZWFyIikpCgpBUlJfY29tcCAlPiUgCiAgZ2dwbG90KGFlcyh4ID0gbW9kZWwsIHkgPSBBUlIsIGdyb3VwID0gc3BfbmFtZSkpICsgCiAgZmFjZXRfZ3JpZChzcF9uYW1lfnNleCkgKwogIGdlb21fcG9pbnQoc2l6ZSA9IDMpICsgCiAgZ2VvbV9saW5lKGxpbmV3aWR0aCA9IDEuNSkgKyAKICBzY2FsZV95X2NvbnRpbnVvdXMoYnJlYWtzID0gYygwLCAwLjUsIDEpKSArIAogIHRoZW1lX21hdHRfZmFjZXRzKCkgKyAKICB0aGVtZShheGlzLnRleHQueCA9IGVsZW1lbnRfdGV4dChhbmdsZSA9IDMwMCwgaGp1c3QgPSAwLCB2anVzdCA9IDAuNSkpCgpgYGAKCiMjIyBTZXggYW5kIHN0YWdlIHZhcmlhdGlvbiBpbiB0aGVybWFsIGxpbWl0cyAKUHJldmlvdXMgc2VjdGlvbnMgaGF2ZSBnZW5lcmFsbHkgbHVtcGVkIGp1dmVuaWxlLCBmZW1hbGUsIGFuZCBtYWxlIGluZGl2aWR1YWxzIHRvZ2V0aGVyLiBUaGVyZSBtYXkgYmUgaW1wb3J0YW50IHN0YWdlLSBvciBzZXgtc3BlY2lmaWMgZGlmZmVyZW5jZXMgaW4gQ1RtYXggdGhvdWdoLiBGb3Igc2V2ZXJhbCBzcGVjaWVzLCB3ZSBoYXZlIG1lYXN1cmVtZW50cyBmb3IgaW5kaXZpZHVhbHMgaW4gZGlmZmVyZW50IHN0YWdlcyBvciBvZiBkaWZmZXJlbnQgc2V4ZXMuIAoKYGBge3Igc2V4LXN0YWdlLXRhYmxlfQpzZXhfc2FtcGxlX3NpemVzID0gY3RtYXhfcmVzaWRzICU+JSAgCiAgZ3JvdXBfYnkoc3BfbmFtZSwgc2V4KSAlPiUgIAogIHN1bW1hcmlzZShudW0gPSBuKCkpICU+JSAgCiAgcGl2b3Rfd2lkZXIoaWRfY29scyA9IHNwX25hbWUsCiAgICAgICAgICAgICAgbmFtZXNfZnJvbSA9IHNleCwgCiAgICAgICAgICAgICAgdmFsdWVzX2Zyb20gPSBudW0sCiAgICAgICAgICAgICAgdmFsdWVzX2ZpbGwgPSAwKSAlPiUgCiAgc2VsZWN0KCJTcGVjaWVzIiA9IHNwX25hbWUsICJKdXZlbmlsZSIgPSBqdXZlbmlsZSwgIkZlbWFsZSIgPSBmZW1hbGUsICJNYWxlIiA9IG1hbGUpCgprbml0cjo6a2FibGUoc2V4X3NhbXBsZV9zaXplcywgYWxpZ24gPSAiYyIpCmBgYAoKVGhlIGZlbWFsZS1tYWxlIGFuZCBmZW1hbGUtanV2ZW5pbGUgY29tcGFyaXNvbnMgc2hvdyB0aGF0IHRoZXJlIGFyZSBnZW5lcmFsbHkgbm8gZGlmZmVyZW5jZXMgaW4gdGhlcm1hbCBsaW1pdHMgYmV0d2VlbiB0aGVzZSBncm91cHMuIAoKYGBge3IgY3RtYXgtc2V4LCBmaWcud2lkdGg9NywgZmlnLmhlaWdodD03fQpjdG1heF9yZXNpZHMgJT4lIAogIGZpbHRlcihzcF9uYW1lICVpbiUgZmlsdGVyKHNleF9zYW1wbGVfc2l6ZXMsIE1hbGUgPiAwLCBGZW1hbGUgPiAwKSRTcGVjaWVzICYgCiAgICAgICAgICAgc2V4ICE9ICJqdXZlbmlsZSIpICU+JSAKICBnZ3Bsb3QoYWVzKHggPSBzZXgsIHkgPSByZXNpZHMsIGNvbG91ciA9IHNwX25hbWUsIGdyb3VwID0gc3BfbmFtZSkpICsgCiAgZmFjZXRfd3JhcChzcF9uYW1lfi4sIG5jb2wgPSAyKSArIAogIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsIHNlID0gRiwgbGluZXdpZHRoID0gMSkgKyAKICBnZW9tX3BvaW50KHNpemUgPSAzLAogICAgICAgICAgICAgYWxwaGEgPSAwLjUsCiAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2ppdHRlcihoZWlnaHQgPSAwLCB3aWR0aCA9IDAuMDUpKSArICAKICBsYWJzKHggPSAiU2V4IiwgCiAgICAgICB5ID0gIkNUbWF4IFJlc2lkdWFscyIpICsgCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBzcGVjaWVzX2NvbHMpICsgCiAgdGhlbWVfYncoYmFzZV9zaXplID0gMTgpICsgCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gIm5vbmUiLCAKICAgICAgICBwYW5lbC5ncmlkID0gZWxlbWVudF9ibGFuaygpKQpgYGAKCmBgYHtyIGN0bWF4LXN0YWdlLCBmaWcud2lkdGg9NywgZmlnLmhlaWdodD03fQpjdG1heF9yZXNpZHMgJT4lIAogIGZpbHRlcihzcF9uYW1lICVpbiUgZmlsdGVyKHNleF9zYW1wbGVfc2l6ZXMsIEp1dmVuaWxlID4gMCAmIEZlbWFsZSA+IDApJFNwZWNpZXMgJiAKICAgICAgICAgICBzZXggIT0gIm1hbGUiKSAlPiUgCiAgZ2dwbG90KGFlcyh4ID0gc2V4LCB5ID0gcmVzaWRzLCBjb2xvdXIgPSBzcF9uYW1lLCBncm91cCA9IHNwX25hbWUpKSArIAogIGZhY2V0X3dyYXAoc3BfbmFtZX4uLCBuY29sID0gMikgKyAKICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLCBzZSA9IEYsIGxpbmV3aWR0aCA9IDEpICsgCiAgZ2VvbV9wb2ludChzaXplID0gMywKICAgICAgICAgICAgIGFscGhhID0gMC41LAogICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9qaXR0ZXIoaGVpZ2h0ID0gMCwgd2lkdGggPSAwLjA1KSkgKyAgCiAgbGFicyh4ID0gIlNleCIsIAogICAgICAgeSA9ICJDVG1heCAowrBDKSIpICsgCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBzcGVjaWVzX2NvbHMpICsgCiAgdGhlbWVfYncoYmFzZV9zaXplID0gMTgpICsgCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gIm5vbmUiLCAKICAgICAgICBwYW5lbC5ncmlkID0gZWxlbWVudF9ibGFuaygpKQpgYGAKCmBgYHtyIHRyYWl0LXZhcmlhbmNlLWNvbGwtdGVtcCwgaW5jbHVkZSA9IEZ9CiMgCiMgR2l2ZW4gdGhlIGxvbmcgZ2VuZXJhdGlvbiB0aW1lcyBvZiB0aGVzZSBjb3BlcG9kcywgZGVjcmVhc2VzIGluIHRyYWl0IHZhcmlhbmNlIG1heSBpbmRpY2F0ZSBzZWxlY3Rpb24gb3ZlciB0aGUgc2Vhc29uYWwgY3ljbGUuIFNob3duIGJlbG93IGFyZSB0aGUgdmFyaWFuY2UgaW4gb2JzZXJ2ZWQgQ1RtYXggYW5kIHNpemUsIHBsb3R0ZWQgYWdhaW5zdCBjb2xsZWN0aW9uIGRhdGUuIFZhcmlhbmNlIGRlY3JlYXNlcyBpbiAqU2tpc3RvZGlhcHRvbXVzKiwgYnV0IHRoaXMgcGF0dGVybiBpcyBkcml2ZW4gYnkgYSBzaW5nbGUgY29sbGVjdGlvbiB3aXRoIGhpZ2ggdmFyaWFuY2UgZWFybHkgaW4gdGhlIHllYXIuIFNpemUgdmFyaWFuY2UgaW5jcmVhc2VzIHNsaWdodGx5IGluICpTa2lzdG9kaWFwdG9tdXMqLiBWYXJpYW5jZSBpbiBib3RoIENUbWF4IGFuZCBzaXplIGlzIGZhaXJseSBjb25zdGFudCBpbiAqTGVwdG9kaWFwdG9tdXMgbWludXR1cyosIHRoZSBvbmx5IG90aGVyIHNwZWNpZXMgY29sbGVjdGVkIGFjcm9zcyB0aGUgZW50aXJlIHNldCBvZiBzYW1wbGVzIHRodXMgZmFyLiAKIyAKIyBnZ3Bsb3QoZHJvcF9uYShhZHVsdF9zdW1tYXJpZXMsIGN0bWF4X3ZhciksIGFlcyh4ID0gYXMuRGF0ZShjb2xsZWN0aW9uX2RhdGUpLCB5ID0gY3RtYXhfdmFyLCBjb2xvdXIgPSBzcF9uYW1lKSkgKyAKIyAgIGZhY2V0X3dyYXAoc3BfbmFtZX4uLCBzY2FsZXMgPSAiZnJlZV95IikgKyAKIyAgIGdlb21fcG9pbnQoc2l6ZSA9IDIpICsgCiMgICBnZW9tX3Ntb290aChzZSA9IEYpICsgCiMgICBsYWJzKHggPSAiQ29sbGVjdGlvbiBUZW1wLiAowrBDKSIsIAojICAgICAgICB5ID0gIkNUbWF4IFZhcmlhbmNlIikgKyAKIyAgIHNjYWxlX2NvbG91cl9tYW51YWwodmFsdWVzID0gc3BlY2llc19jb2xzKSArIAojICAgdGhlbWVfbWF0dF9mYWNldHMoKSArIAojICAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gIm5vbmUiKQojIAojIGdncGxvdChkcm9wX25hKGFkdWx0X3N1bW1hcmllcywgc2l6ZV92YXIpLCBhZXMoeCA9IGFzLkRhdGUoY29sbGVjdGlvbl9kYXRlKSwgeSA9IHNpemVfdmFyLCBjb2xvdXIgPSBzcF9uYW1lKSkgKyAKIyAgIGZhY2V0X3dyYXAoc3BfbmFtZX4uKSArIAojICAgZ2VvbV9wb2ludChzaXplID0gMikgKyAKIyAgIGdlb21fc21vb3RoKHNlID0gRikgKyAKIyAgIGxhYnMoeCA9ICJDb2xsZWN0aW9uIFRlbXAuICjCsEMpIiwgCiMgICAgICAgIHkgPSAiU2l6ZSBWYXJpYW5jZSIpICsgCiMgICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcyA9IHNwZWNpZXNfY29scykgKyAKIyAgIHRoZW1lX21hdHRfZmFjZXRzKCkgKyAKIyAgIHRoZW1lKGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikKYGBgCgoKIyMjIFRyYWl0IENvcnJlbGF0aW9ucyBhbmQgVHJhZGUtb2ZmcwoKQSByZWxhdGlvbnNoaXAgYmV0d2VlbiBzaXplIGFuZCB1cHBlciB0aGVybWFsIGxpbWl0cyBoYXMgYmVlbiBzdWdnZXN0ZWQgaW4gYSB3aWRlIHJhbmdlIG9mIG90aGVyIHRheGEuIFNob3duIGJlbG93IGFyZSB0aGUgbWVhc3VyZWQgdXBwZXIgdGhlcm1hbCBsaW1pdHMgcGxvdHRlZCBhZ2FpbnN0IHByb3NvbWUgbGVuZ3RoLiBUaGUgb3ZlcmFsbCByZWxhdGlvbnNoaXAgKGluY2x1c2l2ZSBvZiBhbGwgc3BlY2llcykgaXMgc2hvd24gYXMgdGhlIGJsYWNrIGxpbmUgaW4gdGhlIGJhY2tncm91bmQuIFJlZ3Jlc3Npb25zIGZvciBlYWNoIGluZGl2aWR1YWwgc3BlY2llcyBhcmUgYWxzbyBzaG93bi4gQWNyb3NzIHRoZSBlbnRpcmUgYXNzZW1ibGFnZSwgdGhlcmUgaXMgYSBzdHJvbmcgZGVjcmVhc2UgaW4gdGhlcm1hbCBsaW1pdHMgd2l0aCBpbmNyZWFzaW5nIHNpemUuICAKCmBgYHtyIGN0bWF4LXNpemUsIGZpZy53aWR0aD0xMCwgZmlnLmhlaWdodD03fQoKZnVsbF9kYXRhICU+JSAKICAjZmlsdGVyKHNleCA9PSAiZmVtYWxlIikgJT4lICAKICBnZ3Bsb3QoIGFlcyh4ID0gc2l6ZSwgeSA9IGN0bWF4LCBjb2xvdXIgPSBzcF9uYW1lKSkgKyAKICBnZW9tX3Ntb290aChkYXRhID0gZnVsbF9kYXRhLCAKICAgICAgICAgICAgICBhZXMoeCA9IHNpemUsIHkgPSBjdG1heCksCiAgICAgICAgICAgICAgbWV0aG9kID0gImxtIiwgCiAgICAgICAgICAgICAgY29sb3VyID0iYmxhY2siLCAKICAgICAgICAgICAgICBsaW5ld2lkdGggPSAyLjUpICsgCiAgZ2VvbV9wb2ludChzaXplID0gMiwgYWxwaGEgPSAwLjMpICsgCiAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwgc2UgPSBGLCBsaW5ld2lkdGggPSAyKSArIAogIGxhYnMoeCA9ICJMZW5ndGggKG1tKSIsIAogICAgICAgeSA9ICJDVG1heCAowrBDKSIsCiAgICAgICBjb2xvdXIgPSAiU3BlY2llcyIpICsgCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBzcGVjaWVzX2NvbHMpICsgCiAgdGhlbWVfbWF0dCgpICsgCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gInJpZ2h0IikKCmBgYAoKU2hvd24gaGVyZSBpcyB0aGUgcmVsYXRpb25zaGlwIGZvciBlYWNoIHNwZWNpZXMgaW5kaXZpZHVhbGx5LiAKCmBgYHtyIGluZC1zcC1jdG1heC1zaXplLCBmaWcud2lkdGg9OSwgZmlnLmhlaWdodD02fQpmdWxsX2RhdGEgJT4lIAogICNmaWx0ZXIoc2V4ID09ICJmZW1hbGUiKSAlPiUgIAogIGdyb3VwX2J5KHNwX25hbWUpICU+JSBmaWx0ZXIobigpID4yKSAlPiUgZmlsdGVyKCFzdHJfZGV0ZWN0KHNwX25hbWUsIHBhdHRlcm4gPSAia2luZHRpIikpICU+JSAKICBnZ3Bsb3QoIGFlcyh4ID0gc2l6ZSwgeSA9IGN0bWF4LCBjb2xvdXIgPSBzcF9uYW1lKSkgKyAKICBmYWNldF93cmFwKHNwX25hbWV+Liwgc2NhbGVzID0gImZyZWUiLCBucm93ID0gMikgKyAKICBnZW9tX3BvaW50KHNpemUgPSAyLCBhbHBoYSA9IDAuOCkgKyAKICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLCBzZSA9IEYsIGxpbmV3aWR0aCA9IDIpICsgCiAgbGFicyh4ID0gIkxlbmd0aCAobW0pIiwgCiAgICAgICB5ID0gIkNUbWF4ICjCsEMpIiwKICAgICAgIGNvbG91ciA9ICJTcGVjaWVzIikgKyAKICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcyA9IHNwZWNpZXNfY29scykgKyAKICB0aGVtZV9tYXR0KCkgKyAKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpCmBgYAoKU2hvd24gYmVsb3cgaXMgdGhlIHJlbGF0aW9uc2hpcCBiZXR3ZWVuIG1lYW4gc2l6ZSBhbmQgbWVhbiB0aGVybWFsIGxpbWl0cyBmb3IgZmVtYWxlcyBvZiBlYWNoIHNwZWNpZXMuIFdlIHNlZSB0aGF0IGxhcmdlciBzcGVjaWVzIHdpdGhpbiB0aGUgY29tbXVuaXR5IHRlbmQgdG8gaGF2ZSBhIGxvd2VyIHRoZXJtYWwgbGltaXQgdGhhbiBzbWFsbGVyIHNwZWNpZXMuIAoKYGBge3IgbWVhbi1jdG1heC1tZWFuLXNpemUtcGxvdCwgZmlnLndpZHRoPTksIGZpZy5oZWlnaHQ9NX0KZnVsbF9kYXRhICU+JSAKICBncm91cF9ieShzcF9uYW1lLCBzZXgpICU+JSAKICBzdW1tYXJpemUobWVhbl9jdG1heCA9IG1lYW4oY3RtYXgsIG5hLnJtID0gVCksCiAgICAgICAgICAgIG1lYW5fc2l6ZSA9IG1lYW4oc2l6ZSwgbmEucm0gPSBUKSkgJT4lIAogICNmaWx0ZXIoc2V4ID09ICJmZW1hbGUiKSAlPiUgCiAgZ2dwbG90KGFlcyh4ID0gbWVhbl9zaXplLCB5ID0gbWVhbl9jdG1heCkpICsgCiAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwgc2UgPSBGLCBsaW5ld2lkdGggPSAyLCBjb2xvdXIgPSAiYmxhY2siKSArIAogIGdlb21fcG9pbnQoYWVzKGNvbG91ciA9IHNwX25hbWUsIHNoYXBlID0gc2V4KSwKICAgICAgICAgICAgIHNpemUgPSA1KSArIAogIGxhYnMoeCA9ICJMZW5ndGggKG1tKSIsIAogICAgICAgeSA9ICJDVG1heCAowrBDKSIsCiAgICAgICBjb2xvdXIgPSAiU3BlY2llcyIpICsgCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBzcGVjaWVzX2NvbHMpICsgCiAgdGhlbWVfbWF0dCgpICsgCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gInJpZ2h0IikKYGBgCgpgYGB7ciBjdG1heHJlc2lkcy1zaXplLCBmaWcud2lkdGg9MTAsIGZpZy5oZWlnaHQ9NywgaW5jbHVkZSA9IEZ9CmN0bWF4X3Jlc2lkcyAlPiUgCiAgI2ZpbHRlcihzZXggPT0gImZlbWFsZSIpICU+JSAKICBnZ3Bsb3QoYWVzKHggPSBzaXplX3Jlc2lkcywgeSA9IHJlc2lkcywgY29sb3VyID0gc3BfbmFtZSkpICsgCiAgZmFjZXRfd3JhcChzcF9uYW1lfi4pICsgCiAgZ2VvbV9wb2ludChzaXplID0gMikgKyAKICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLCBzZSA9IEYsIGxpbmV3aWR0aCA9IDIpICsgCiAgbGFicyh4ID0gIkxlbmd0aCAobW0pIiwgCiAgICAgICB5ID0gIkNUbWF4ICjCsEMpIikgKyAKICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcyA9IHNwZWNpZXNfY29scykgKyAKICB0aGVtZV9tYXR0KCkgKyAKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpCmBgYAoKU2hvd24gaGVyZSBpcyB0aGUgcmVsYXRpb25zaGlwIGJldHdlZW4gZmVjdW5kaXR5IGFuZCBzaXplLCBzaG93aW5nIHRoZSBjbGFzc2ljIHBhdHRlcm4gb2YgaW5jcmVhc2luZyBlZ2cgcHJvZHVjdGlvbiB3aXRoIGluY3JlYXNpbmcgc2l6ZS4gCgpgYGB7ciBmZWN1bmRpdHktc2l6ZSwgZmlnLndpZHRoPTEwLCBmaWcuaGVpZ2h0PTd9CmN0bWF4X3Jlc2lkcyAlPiUgIAogIGRyb3BfbmEoZmVjdW5kaXR5KSAlPiUgCiAgZ2dwbG90KGFlcyh4ID0gc2l6ZSwgeSA9IGZlY3VuZGl0eSwgY29sb3VyID0gc3BfbmFtZSkpICsgCiAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwgc2UgPSBGLCBsaW5ld2lkdGggPSAyKSArIAogIGdlb21fcG9pbnQoc2l6ZSA9IDIsIGFscGhhID0gMC41KSArIAogIGxhYnMoeCA9ICJQcm9zb21lIGxlbmd0aCAobW0pIiwgCiAgICAgICB5ID0gIkZlY3VuZGl0eSAoIyBFZ2dzKSIsCiAgICAgICBjb2xvdXIgPSAiU3BlY2llcyIpICsgCiAgc2NhbGVfY29sb3VyX21hbnVhbCh2YWx1ZXMgPSBzcGVjaWVzX2NvbHMpICsgCiAgdGhlbWVfbWF0dCgpICsgCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gInJpZ2h0IikKYGBgCgpJbmRpdmlkdWFscyBtYXkgYWxzbyBhbGxvY2F0ZSBlbmVyZ3kgdG8gZGlmZmVyZW50IGZpdG5lc3MgcmVsYXRlZCB0cmFpdHMsIHByaW9yaXRpemluZyByZXByb2R1Y3RpdmUgb3V0cHV0IG92ZXIgZW52aXJvbm1lbnRhbCB0b2xlcmFuY2UsIGZvciBleGFtcGxlLiBTaG93biBiZWxvdyBpcyB0aGUgcmVsYXRpb25zaGlwIGJldHdlZW4gQ1RtYXggcmVzaWR1YWxzIChhZ2FpbiwgY29udHJvbGxpbmcgZm9yIHRoZSBlZmZlY3RzIG9mIGNvbGxlY3Rpb24gdGVtcGVyYXR1cmUpIGFnYWluc3QgZmVjdW5kaXR5LiBXZSBjYW4gc2VlIGNsZWFybHkgdGhhdCBpbmRpdmlkdWFscyB3aXRoIGluY3JlYXNlZCBmZWN1bmRpdHkgYXJlIG5vdCBkZWNyZWFzaW5nIHRoZXJtYWwgbGltaXRzLCBzdWdnZXN0aW5nIHRoYXQgdGhlcmUgaXMgbm8gZW5lcmdldGljIHRyYWRlLW9mZiBiZXR3ZWVuIHRoZXNlIHRyYWl0cy4gCgpgYGB7ciwgY3RtYXgtZmVjdW5kaXR5LCBmaWcud2lkdGg9MTAsIGZpZy5oZWlnaHQ9N30KY3RtYXhfcmVzaWRzICU+JSAgCiAgZHJvcF9uYShmZWN1bmRpdHkpICU+JSAKICBnZ3Bsb3QoYWVzKHggPSBjdG1heCwgeSA9IGZlY3VuZGl0eSwgY29sb3VyID0gc3BfbmFtZSkpICsgCiAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwgc2UgPSBGLCBsaW5ld2lkdGggPSAyKSArIAogIGdlb21fcG9pbnQoc2l6ZSA9IDIsIGFscGhhID0gMC41KSArIAogIGxhYnMoeCA9ICJDVG1heCBSZXNpZHVhbHMiLCAKICAgICAgIHkgPSAiRmVjdW5kaXR5ICgjIEVnZ3MpIikgKyAKICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcyA9IHNwZWNpZXNfY29scykgKyAKICB0aGVtZV9tYXR0KCkgKyAKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAicmlnaHQiKQoKZml0bmVzcy5tb2RlbCA9IGxtKGRhdGEgPSBjdG1heF9yZXNpZHMsIAogICAgICAgICAgICAgICAgICAgZmVjdW5kaXR5IH4gcmVzaWRzICogc3BfbmFtZSkKCmNhcjo6QW5vdmEoZml0bmVzcy5tb2RlbCkKCmVtbWVhbnM6OmVtdHJlbmRzKGZpdG5lc3MubW9kZWwsICB2YXIgPSAicmVzaWRzIiwic3BfbmFtZSIpCmBgYAoKIyMgT3RoZXIgcGF0dGVybnMgaW4gdmFyaWF0aW9uIAoKKkxlcHRvZGlhcHRvbXVzIHNpY2lsaXMqIGlzIHRoZSBtb3N0IGFidW5kYW50IHNwZWNpZXMgZHVyaW5nIHRoZSB3aW50ZXIuIFRoZXJlIHdhcyBhIGxhcmdlIHNoaWZ0IGluIHRoZSBzaXplIG9mIG1hdHVyZSBmZW1hbGVzIHRvd2FyZHMgdGhlIGVuZCBvZiBEZWNlbWJlci4gVGhlc2UgbGFyZ2UgYW5kIHNtYWxsIGluZGl2aWR1YWxzIGFyZSB0aGUgc2FtZSBzcGVjaWVzIChjb25maXJtZWQgdmlhIENPSSBzZXF1ZW5jaW5nKSwgc3VnZ2VzdGluZyB0aGlzIHNoaWZ0IG1heSByZWZsZWN0IGEgdHJhbnNpdGlvbiBmcm9tIG9uZSBnZW5lcmF0aW9uIHRvIGFub3RoZXIgYW5kIHRoYXQsIHVubGlrZSBpbiBtYW55IG90aGVyIGxha2VzLCB0aGVyZSBhcmUgdHdvIGdlbmVyYXRpb25zIG9mICpMLiBzaWNpbGlzKiBwZXIgeWVhciBpbiBMYWtlIENoYW1wbGFpbi4gVGhpcyBzaXplIGRpZmZlcmVuY2UgbWF5IGJlIGNhdXNlZCBieSBkaWZmZXJlbmNlcyBpbiB0aGUgZGV2ZWxvcG1lbnRhbCBlbnZpcm9ubWVudHMuIEZvciBleGFtcGxlLCBpbmRpdmlkdWFscyBkZXZlbG9waW5nIGluIEphbnVhcnkgZ3JvdyB1cCBhdCB2ZXJ5IGxvdyB0ZW1wZXJhdHVyZXMsIGFuZCB0aGVyZWZvcmUgbWF5IHJlYWNoIGxhcmdlciBzaXplcy4gVGhlc2UgaW5kaXZpZHVhbHMgb3ZlcnN1bW1lciBpbiBkZWVwIHdhdGVycywgdGhlbiByZS1lbWVyZ2UgaW4gT2N0b2JlciBhbmQgcHJvZHVjZSBhIG5ldyBnZW5lcmF0aW9uLiBXYXRlciB0ZW1wZXJhdHVyZXMgYXJlIHN0aWxsIGZhaXJseSBoaWdoIHRocm91Z2ggTm92ZW1iZXIsIHdoaWNoIHJlc3VsdHMgaW4gYSBnZW5lcmF0aW9uIG9mIHNtYWxsZXIgaW5kaXZpZHVhbHMsIHdoaWNoIG1hdHVyZSBpbiB0aW1lIHRvIHByb2R1Y2UgYSBuZXcgZ2VuZXJhdGlvbiBpbiBKYW51YXJ5LiAKClNob3duIGJlbG93IGlzIHRoZSBkaXN0cmlidXRpb24gb2YgcGFpcndpc2UgZGlzdGFuY2VzIGJldHdlZW4gQ09JIHNlcXVlbmNlcyBvZiBsYXJnZSBhbmQgc21hbGwgbW9ycGhzLiBEaXN0YW5jZXMgaW4gYm90aCB3aXRoaW4tIGFuZCBhY3Jvc3MtbW9ycGggY29tcGFyaXNvbnMgYXJlIHNtYWxsLiAKCmBgYHtyfQppbmRfZGlzdCA9IGFwZTo6ZGlzdC5kbmEoc2ljX2RuYWJpbiwgbW9kZWwgPSAicmF3IikgJT4lIGFzLm1hdHJpeCAlPiUgCiAgYXNfdGliYmxlKCkgJT4lCiAgbXV0YXRlKCJpbmQxIiA9IGNvbG5hbWVzKC4pKSAlPiUgCiAgcGl2b3RfbG9uZ2VyKC1pbmQxLCBuYW1lc190byA9ICJpbmQyIiwgdmFsdWVzX3RvID0gImRpc3QiKSAlPiUKICBtdXRhdGUoaW5kMSA9IGZhY3RvcihpbmQxKSwKICAgICAgICAgaW5kMiA9IGZhY3RvcihpbmQyKSkgJT4lIAogIGZpbHRlcighKGluZDEgPT0gInNvcmUxIiB8IGluZDIgPT0gInNvcmUxIikpICU+JSAKICBtdXRhdGUoCiAgICBpbmQxID0gY2FzZV93aGVuKAogICAgICBpbmQxID09ICJTMSIgfiAic21hbGwxIiwKICAgICAgaW5kMSA9PSAiUzMiIH4gInNtYWxsMyIsCiAgICAgIGluZDEgPT0gImxzaWMzIiB+ICJzbWFsbDQiLAogICAgICBpbmQxID09ICJsc2ljNSIgfiAic21hbGw2IiwKICAgICAgaW5kMSA9PSAibHNpYzkiIH4gInNtYWxsOCIsCiAgICAgIGluZDEgPT0gImxzaWMxMCIgfiAic21hbGw5IiwKICAgICAgaW5kMSA9PSAibHNpYzExIiB+ICJzbWFsbDEwIiwKICAgICAgaW5kMSA9PSAiTDEiIH4gImxhcmdlMSIsCiAgICAgIGluZDEgPT0gIkwyIiB+ICJsYXJnZTIiLAogICAgICBpbmQxID09ICJMMyIgfiAibGFyZ2UzIiwKICAgICAgaW5kMSA9PSAibHNpYzEiIH4gImxhcmdlNCIsCiAgICAgIGluZDEgPT0gImxzaWMyIiB+ICJsYXJnZTUiLAogICAgICBpbmQxID09ICJsc2ljNyIgfiAibGFyZ2U2IiwKICAgICAgaW5kMSA9PSAibHNpYzgiIH4gImxhcmdlNyIpLAogICAgaW5kMiA9IGNhc2Vfd2hlbigKICAgICAgaW5kMiA9PSAiUzEiIH4gInNtYWxsMSIsCiAgICAgIGluZDIgPT0gIlMzIiB+ICJzbWFsbDMiLAogICAgICBpbmQyID09ICJsc2ljMyIgfiAic21hbGw0IiwKICAgICAgaW5kMiA9PSAibHNpYzUiIH4gInNtYWxsNiIsCiAgICAgIGluZDIgPT0gImxzaWM5IiB+ICJzbWFsbDgiLAogICAgICBpbmQyID09ICJsc2ljMTAiIH4gInNtYWxsOSIsCiAgICAgIGluZDIgPT0gImxzaWMxMSIgfiAic21hbGwxMCIsCiAgICAgIGluZDIgPT0gIkwxIiB+ICJsYXJnZTEiLAogICAgICBpbmQyID09ICJMMiIgfiAibGFyZ2UyIiwKICAgICAgaW5kMiA9PSAiTDMiIH4gImxhcmdlMyIsCiAgICAgIGluZDIgPT0gImxzaWMxIiB+ICJsYXJnZTQiLAogICAgICBpbmQyID09ICJsc2ljMiIgfiAibGFyZ2U1IiwKICAgICAgaW5kMiA9PSAibHNpYzciIH4gImxhcmdlNiIsCiAgICAgIGluZDIgPT0gImxzaWM4IiB+ICJsYXJnZTciKSwKICAgICdjb21wYXJpc29uJyA9IGNhc2Vfd2hlbigKICAgICAgc3RyX2RldGVjdChpbmQxLCBwYXR0ZXJuID0gImxhcmdlIikgJiBzdHJfZGV0ZWN0KGluZDIsIHBhdHRlcm4gPSAibGFyZ2UiKSB+ICJ3aXRoaW4iLAogICAgICBzdHJfZGV0ZWN0KGluZDEsIHBhdHRlcm4gPSAic21hbGwiKSAmIHN0cl9kZXRlY3QoaW5kMiwgcGF0dGVybiA9ICJzbWFsbCIpIH4gIndpdGhpbiIsIAogICAgICBzdHJfZGV0ZWN0KGluZDEsIHBhdHRlcm4gPSAibGFyZ2UiKSAmIHN0cl9kZXRlY3QoaW5kMiwgcGF0dGVybiA9ICJzbWFsbCIpIH4gImFjcm9zcyIsCiAgICAgIHN0cl9kZXRlY3QoaW5kMSwgcGF0dGVybiA9ICJzbWFsbCIpICYgc3RyX2RldGVjdChpbmQyLCBwYXR0ZXJuID0gImxhcmdlIikgfiAiYWNyb3NzIgogICAgKSkgCgpnZ3Bsb3QoaW5kX2Rpc3QsIGFlcyhkaXN0LCBmaWxsID0gY29tcGFyaXNvbikpICsKICBnZW9tX2hpc3RvZ3JhbShiaW53aWR0aCA9IDAuMDA1KSArIAogIGxhYnMoeCA9ICJEaXN0YW5jZSIpICsgCiAgdGhlbWVfbWF0dCgpCmBgYAoKCmBgYHtyfQpmdWxsX2RhdGEgJT4lICAKICBmaWx0ZXIoc3BfbmFtZSA9PSAiTGVwdG9kaWFwdG9tdXMgc2ljaWxpcyIpICU+JSAKICBmaWx0ZXIoc2V4ICE9ICJqdXZlbmlsZSIpICU+JSAKICBncm91cF9ieShjb2xsZWN0aW9uX2RhdGUpICU+JSAKICBtdXRhdGUoc2l6ZV9jZW50ZXIgPSBzY2FsZShzaXplLCBjZW50ZXIgPSBULCBzY2FsZSA9IEYpKSAlPiUgCiAgZ2dwbG90KGFlcyh5ID0gZmFjdG9yKGNvbGxlY3Rpb25fZGF0ZSksIHggPSBzaXplLCBmaWxsID0gY29sbGVjdGlvbl90ZW1wKSkgKyAKICBmYWNldF93cmFwKHNleH4uKSArIAogIGdlb21fZGVuc2l0eV9yaWRnZXMoYmFuZHdpZHRoID0gMC4wNCkgKyAKICBnZW9tX3ZsaW5lKHhpbnRlcmNlcHQgPSAwLjg5KSArIAogIGxhYnMoeCA9ICJTaXplIChtbSkiLAogICAgICAgeSA9ICJEYXRlIiwgCiAgICAgICBmaWxsID0gIkNvbGwuIFRlbXAuICjCsEMpIikgKyAKICB0aGVtZV9tYXR0KCkgKyAKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAicmlnaHQiLAogICAgICAgIGF4aXMudGV4dC55ID0gZWxlbWVudF90ZXh0KHNpemUgPSAxMikpCmBgYAoKYGBge3J9CmZ1bGxfZGF0YSAlPiUgIAogIGZpbHRlcihzcF9uYW1lID09ICJMZXB0b2RpYXB0b211cyBtaW51dHVzIikgJT4lIAogIGZpbHRlcihzZXggIT0gImp1dmVuaWxlIikgJT4lIAogIGdncGxvdChhZXMoeSA9IGZhY3Rvcihjb2xsZWN0aW9uX2RhdGUpLCB4ID0gc2l6ZSwgZmlsbCA9IGNvbGxlY3Rpb25fdGVtcCkpICsgCiAgZmFjZXRfd3JhcChzZXh+LikgKyAKICBnZW9tX2RlbnNpdHlfcmlkZ2VzKGJhbmR3aWR0aCA9IDAuMDQpICsgCiAgZ2VvbV92bGluZSh4aW50ZXJjZXB0ID0gMC42OSkgKyAKICBsYWJzKHggPSAiU2l6ZSAobW0pIiwKICAgICAgIHkgPSAiRGF0ZSIsIAogICAgICAgZmlsbCA9ICJDb2xsLiBUZW1wLiAowrBDKSIpICsgCiAgY29vcmRfY2FydGVzaWFuKHhsaW0gPSBjKDAuNSwwLjkpKSArIAogIHRoZW1lX21hdHQoKSArIAogIHRoZW1lKGxlZ2VuZC5wb3NpdGlvbiA9ICJyaWdodCIsCiAgICAgICAgYXhpcy50ZXh0LnkgPSBlbGVtZW50X3RleHQoc2l6ZSA9IDEyKSkKYGBgCgojIyBEaXN0cmlidXRpb24gTGFnIE5vbi1MaW5lYXIgTW9kZWwgKERMTk0gYXBwcm9hY2gpIApgYGB7cn0KZGxubV9kYXRhID0gZnVsbF9kYXRhICU+JSAgCiAgZmlsdGVyKHNleCA9PSAiZmVtYWxlIikgJT4lIAogIHNlbGVjdChjb2xsZWN0aW9uX2RhdGUsIGRheXNfaW5fbGFiLCBjb2xsZWN0aW9uX3RlbXAsIHJlcGxpY2F0ZSwgc3BfbmFtZSwgc2l6ZSwgZmVjdW5kaXR5LCBjdG1heCkgJT4lIAogIGdyb3VwX2J5KGNvbGxlY3Rpb25fZGF0ZSwgY29sbGVjdGlvbl90ZW1wLCBzcF9uYW1lKSAlPiUgIAogIHN1bW1hcmlzZShtZWFuX2N0bWF4ID0gbWVhbihjdG1heCwgbmEucm0gPSBUKSwKICAgICAgICAgICAgbWVhbl9zaXplID0gbWVhbihzaXplLCBuYS5ybSA9IFQpLAogICAgICAgICAgICBzYW1wbGUgPSBuKCkpCmBgYAoKYGBge3J9CmhvdXJseV90ZW1wcyA9IHJhd190ZW1wcyAlPiUgIAogIG11dGF0ZShob3VyID0gbHVicmlkYXRlOjpob3VyKGRhdGVUaW1lKSkgJT4lICAKICBncm91cF9ieShkYXRlLCBob3VyKSAlPiUgIAogIHN1bW1hcmlzZShtZWFuX3RlbXAgPSBtZWFuKGRlZ0MpKSAlPiUgCiAgdW5ncm91cCgpICU+JSAKICBjb21wbGV0ZShkYXRlLCBuZXN0aW5nKGhvdXIpKSAlPiUgIAogIG11dGF0ZSh0aW1lc3RlcCA9IHltZF9obXMoCiAgICBwYXN0ZShsdWJyaWRhdGU6OmFzX2RhdGUoZGF0ZSksIAogICAgICAgICAgcGFzdGUwKGhvdXIsICI6MDA6MDAiKSwgc2VwID0gIiAiKSksCiAgICBvYnNlcnZhdGlvbiA9IHJvd19udW1iZXIoKSkgCgpgYGAKCmBgYHtyfQppZihwcmVkaWN0X3Z1bG4gPT0gRil7CiAga25pdHI6OmtuaXRfZXhpdCgpCn0KYGBgCgoKIyMgUHJlZGljdGluZyBWdWxuZXJhYmlsaXR5IApVc2luZyB0aGUgb2JzZXJ2ZWQgdGhlcm1hbCBsaW1pdCBkYXRhLCB3ZSBjYW4gcHJvZHVjZSBhIGhpbmRjYXN0IG9mIHRoZXJtYWwgc3RyZXNzIGZvciBMYWtlIENoYW1wbGFpbiBjb3BlcG9kcy4gRm9yIHRoZXNlIGluaXRpYWwgYXNzYXlzLCB3ZSB3aWxsIGRlZmluZSB0aGVybWFsIHN0cmVzcyBhcyBhbnkgdGltZSB3aGVuIG1heGltdW0gZGFpbHkgd2F0ZXIgdGVtcGVyYXR1cmUgaXMgd2l0aGluIDLCsEMgb2YgY29wZXBvZCBDVG1heCBvciBoaWdoZXIuIFdlIHdpbGwgdXNlIHRocmVlIGRpZmZlcmVudCBzY2VuYXJpb3M6IDEpIHRoZSBhdmVyYWdlIENUbWF4IGZvciBlYWNoIHNwZWNpZXMsIDIpIENUbWF4IHByZWRpY3RlZCB1c2luZyBjb2xsZWN0aW9uIHRlbXBlcmF0dXJlcywgYW5kIDMpIGZvciBzcGVjaWVzIHRoYXQgaGF2ZSBzdWZmaWNpZW50IGRhdGEsIENUbWF4IHByZWRpY3RlZCB1c2luZyB3aGljaGV2ZXIgZW52aXJvbm1lbnRhbCBmYWN0b3IgaXMgdGhlIHN0cm9uZ2VzdCBjYW5kaWRhdGUgZm9yIGRyaXZpbmcgYWNjbGltYXRpb24uIEluIGFsbCBjYXNlcywgZGF0YSBpcyBmaWx0ZXJlZCB0byBqdXN0IHRoZXJtYWwgbGltaXRzIG9mIGFkdWx0IGZlbWFsZXMuIAoKIyMjIFNjZW5hcmlvIDEKYGBge3J9Cm1lYW5fY3RtYXggPSBmdWxsX2RhdGEgJT4lIAogIGZpbHRlcihzZXggPT0gImZlbWFsZSIpICU+JSAgCiAgZ3JvdXBfYnkoc3BfbmFtZSkgJT4lIAogIHN1bW1hcml6ZSgibWVhbl9jdG1heCIgPSBtZWFuKGN0bWF4KSkgJT4lIAogIGFycmFuZ2UobWVhbl9jdG1heCkKCmtuaXRyOjprYWJsZShtZWFuX2N0bWF4KQpgYGAKCmBgYHtyfQojICMgQ29uc3RydWN0cyB0aGUgVVJMIGZvciB0aGUgZnVsbCB0ZW1wZXJhdHVyZSBkYXRhIHNldDsgUlVOIFRISVMgT05DRQojIGhpbmRfdXJsID0gY29uc3RydWN0TldJU1VSTChzaXRlTnVtYmVycyA9IHNpdGVOdW1iZXIsIHBhcmFtZXRlckNkID0gcGFyYW1ldGVyQ2QsIHNlcnZpY2UgPSAidXYiKQojIAojIGhpbmRfdGVtcF9kYXRhID0gaW1wb3J0V2F0ZXJNTDEoaGluZF91cmwsIGFzRGF0ZVRpbWUgPSBUKSAlPiUKIyAgIG11dGF0ZSgiZGF0ZSIgPSBhcy5EYXRlKGRhdGVUaW1lKSkgJT4lCiMgICBzZWxlY3QoZGF0ZSwgInRlbXAiID0gWF8wMDAxMF8wMDAwMCkKIyAKIyB3cml0ZS50YWJsZSh4ID0gaGluZF90ZW1wX2RhdGEsIGZpbGUgPSAiaGluZGNhc3RfdGVtcHMuY3N2Iiwgcm93Lm5hbWVzID0gRiwgc2VwID0gIiwiKQpgYGAKCmBgYHtyfQojIGdncGxvdChoaW5kX3RlbXBfZGF0YSwgYWVzKHggPSBkYXRlLCB5ID0gdGVtcCkpICsgCiMgICBnZW9tX2xpbmUobGluZXdpZHRoID0gMC4xKSArIAojICAgbGFicyh4ID0gIkRhdGUiLCAKIyAgICAgICAgeSA9ICJXYXRlciBUZW1wZXJhdHVyZSAowrBDKSIpICsKIyAgIHRoZW1lX21hdHQoKQpgYGAKCkluIHRoZSBzaW1wbGVzdCBzY2VuYXJpbywgc3BlY2llcyB0aGVybWFsIGxpbWl0cyBhcmUgc3RhdGljIHRocm91Z2ggdGltZSwgcmVwcmVzZW50ZWQgYnkgdGhlIGF2ZXJhZ2UgQ1RtYXggb2YgYWR1bHQgZmVtYWxlIGNvcGVwb2RzLiBJbiB0aGlzIHNjZW5hcmlvLCBvbmx5IHRocmVlIG9mIHRoZSBzZXZlbiBvYnNlcnZlZCBzcGVjaWVzIGFyZSBleHBvc2VkIHRvIHRoZXJtYWwgc3RyZXNzICh0ZW1wZXJhdHVyZXMgd2l0aGluIDXCsEMgb2YgQ1RtYXgpLiBUZW1wZXJhdHVyZXMgYXBwcm9hY2hlZCB0aGUgdGhlcm1hbCBsaW1pdCBvZiAqTGVwdG9kaWFwdG9tdXMgc2ljaWxpcyogb24gYSBoYW5kZnVsIG9mIGRheXMuIEJ5IGNvbnRyYXN0LCAqU2VuZWNlbGxhIGNhbGFub2lkZXMqIGFuZCAqTGltbm9jYWxhbnVzIG1hY3J1cnVzKiB3ZXJlIGJvdGggZXhwb3NlZCB0byBzdWJzdGFudGlhbCB0aGVybWFsIHN0cmVzcyB0aHJvdWdob3V0IGEgbGFyZ2UgcG9ydGlvbiBvZiB0aGUgeWVhciwgbGlrZWx5IGV4cGxhaW5pbmcgd2h5IHRoZXNlIHNwZWNpZXMgYXJlIGFic2VudCBmcm9tIHRoZSBjb21tdW5pdHkgZm9yIHRoZSBzdW1tZXIgYW5kIGZhbGwgcGVyaW9kcy4gCgpgYGB7ciBmaWcud2lkdGg9MTAsIGZpZy5oZWlnaHQ9NX0KaGluZDFfZGF0YSA9IGhpbmRfdGVtcF9kYXRhICU+JSAKICBncm91cF9ieShkYXRlKSAlPiUgCiAgc3VtbWFyaXplKCJkYWlseV9tYXgiID0gbWF4KHRlbXApLAogICAgICAgICAgICAiZGFpbHlfbWVhbiIgPSBtZWFuKHRlbXApLCkgJT4lIAogIGJpbmRfY29scyhwaXZvdF93aWRlcihtZWFuX2N0bWF4LCBuYW1lc19mcm9tID0gc3BfbmFtZSwgdmFsdWVzX2Zyb20gPSBtZWFuX2N0bWF4KSkgJT4lICAKICBwaXZvdF9sb25nZXIoY29scyA9IGMoLWRhdGUsIC1kYWlseV9tYXgsIC1kYWlseV9tZWFuKSwKICAgICAgICAgICAgICAgbmFtZXNfdG8gPSAic3BlY2llcyIsIAogICAgICAgICAgICAgICB2YWx1ZXNfdG8gPSAibWVhbl9jdG1heCIpICU+JSAgCiAgbXV0YXRlKGxpbV9kaWZmID0gbWVhbl9jdG1heCAtIGRhaWx5X21heCkgJT4lICAKICBtdXRhdGUoZG95ID0geWRheShkYXRlKSwKICAgICAgICAgIm1ldGhvZCIgPSAiTm9fYWNjbGltYXRpb24iKQoKaGluZF9kYWlseV90ZW1wX2RhdGEgPSBoaW5kX3RlbXBfZGF0YSAlPiUKICB1bmdyb3VwKCkgJT4lIAogIGdyb3VwX2J5KGRhdGUpICU+JSAKICBzdW1tYXJpc2UobWVhbl90ZW1wID0gbWVhbih0ZW1wKSwKICAgICAgICAgICAgbWVkX3RlbXAgPSBtZWRpYW4odGVtcCksCiAgICAgICAgICAgIHZhcl90ZW1wID0gdmFyKHRlbXApLCAKICAgICAgICAgICAgbWluX3RlbXAgPSBtaW4odGVtcCksIAogICAgICAgICAgICBtYXhfdGVtcCA9IG1heCh0ZW1wKSkgJT4lIAogIG11dGF0ZSgicmFuZ2VfdGVtcCIgPSBtYXhfdGVtcCAtIG1pbl90ZW1wKQoKI3RhYmxlKGhpbmQxX2RhdGEkc3BlY2llcykKCmhpbmQxX2RhdGEgJT4lIAogIGZpbHRlcihsaW1fZGlmZiA8PSA1KSAlPiUgIAogIGdncGxvdChhZXMoeCA9IGRveSwgeSA9IGxpbV9kaWZmLCBjb2xvdXIgPSBzcGVjaWVzKSkgKwogIGdlb21faGxpbmUoeWludGVyY2VwdCA9IDApICsgCiAgZ2VvbV9obGluZSh5aW50ZXJjZXB0ID0gNSwgCiAgICAgICAgICAgICBjb2xvdXIgPSAiZ3JleSIpICsgCiAgZ2VvbV9wb2ludChhbHBoYSA9IDAuNSkgKwogIGdlb21fc21vb3RoKHNlID0gRikgKyAKICBsYWJzKHggPSAiRGF5IG9mIFllYXIiLCAKICAgICAgIHkgPSAiUHJlZGljdGVkIFdhcm1pbmcgVG9sZXJhbmNlIFxuKMKwQyBBYm92ZSBEYWlseSBNYXgpIikgKyAKICB0aGVtZV9tYXR0KCkgKyAKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAicmlnaHQiKQpgYGAKCiMjIyBTY2VuYXJpbyAyCkluIHRoZSBzZWNvbmQgc2NlbmFyaW8sIHRoZXJtYWwgbGltaXRzIHZhcnkgd2l0aGluIGFuZCBiZXR3ZWVuIHNwZWNpZXMuIEEgc2ltcGxlIG1vZGVsIGlzIHVzZWQgdG8gcHJlZGljdCBzcGVjaWVzIHRoZXJtYWwgbGltaXRzIGJhc2VkIG9uIG1lYW4gZGFpbHkgdGVtcGVyYXR1cmUgKENUbWF4IGFzIGEgZnVuY3Rpb24gb2Ygc3BlY2llcyBhbmQgY29sbGVjdGlvbiB0ZW1wZXJhdHVyZSwgYnV0IHdpdGhvdXQgdGhlIGludGVyYWN0aW9uIGJldHdlZW4gdGhlc2UgdHdvIGZhY3RvcnMpLiBUaGVzZSBwcmVkaWN0ZWQgdGhlcm1hbCBsaW1pdHMgYXJlIHRoZW4gY29tcGFyZWQgYWdhaW5zdCB0aGUgbWF4aW11bSBkYWlseSB0ZW1wZXJhdHVyZSB0byBlc3RpbWF0ZSB0aGVybWFsIHN0cmVzcywgYXMgaW4gU2NlbmFyaW8gMS4gSW5jbHVkaW5nIHRoaXMgc2ltcGxlIGZvcm0gb2YgYWNjbGltYXRpb24gaW4gdGhlIG1vZGVsIHJlZHVjZWQgdGhlIGRlZ3JlZSBvZiB0aGVybWFsIHN0cmVzcyBmb3IgZWFjaCBzcGVjaWVzLCBlbGltaW5hdGluZyBpdCBlbnRpcmVseSBmb3IgKkxlcHRvZGlhcHRvbXVzIHNpY2lsaXMqLiBOb3RlIHRoYXQgdGhlIG1hZ25pdHVkZSBvZiB0aGUgcHJlZGljdGVkIHN0cmVzcyBpcyAgbG93IGVub3VnaCB0aGF0IHJlbW92aW5nIHRoZSA1wrBDIGJ1ZmZlciBhcm91bmQgdGhlIHByZWRpY3RlZCB0aGVybWFsIGxpbWl0cyB3b3VsZCBhY3R1YWxseSBsaW1pdCBwcmVkaWN0ZWQgdGhlcm1hbCBzdHJlc3MgdG8ganVzdCBhIGZldyBkYXlzIGZvciAqU2VuZWNlbGxhIGNhbGFub2lkZXMqLiAKCmBgYHtyIGZpZy5oZWlnaHQ9NSwgZmlnLndpZHRoPTEwfQpoaW5kY2FzdF9tb2RlbDEgPSBsbShkYXRhID0gZmlsdGVyKGZ1bGxfZGF0YSwgc2V4ID09ICJmZW1hbGUiKSwKICAgICAgICAgICAgICAgICAgICAgY3RtYXggfiBjb2xsZWN0aW9uX3RlbXAgKyBzcF9uYW1lKQoKaGluZDJfZGF0YSA9IGhpbmRfdGVtcF9kYXRhICU+JSAKICBncm91cF9ieShkYXRlKSAlPiUgCiAgc3VtbWFyaXplKCJjb2xsZWN0aW9uX3RlbXAiID0gbWVhbih0ZW1wKSwKICAgICAgICAgICAgImRhaWx5X21heCIgPSBtYXgodGVtcCkpICU+JSAKICBiaW5kX2NvbHMoCiAgICBwaXZvdF93aWRlcihtZWFuX2N0bWF4LCAKICAgICAgICAgICAgICAgIG5hbWVzX2Zyb20gPSBzcF9uYW1lLCAKICAgICAgICAgICAgICAgIHZhbHVlc19mcm9tID0gbWVhbl9jdG1heCkpICU+JSAKICBwaXZvdF9sb25nZXIoY29scyA9IGMoLWRhdGUsIC1kYWlseV9tYXgsIC1jb2xsZWN0aW9uX3RlbXApLAogICAgICAgICAgICAgICBuYW1lc190byA9ICJzcF9uYW1lIiwgCiAgICAgICAgICAgICAgIHZhbHVlc190byA9ICJtZWFuX2N0bWF4IikgJT4lIAogIHNlbGVjdCgtbWVhbl9jdG1heCkgJT4lIAogIG11dGF0ZSgicHJlZF9jdG1heCIgPSBwcmVkaWN0LmxtIChoaW5kY2FzdF9tb2RlbDEsIG5ld2RhdGEgPSAuKSkgJT4lIAogIHNlbGVjdChkYXRlLCAiZGFpbHlfbWVhbiIgPSBjb2xsZWN0aW9uX3RlbXAsIGRhaWx5X21heCwgInNwZWNpZXMiID0gc3BfbmFtZSwgcHJlZF9jdG1heCkgJT4lIAogIG11dGF0ZShsaW1fZGlmZiA9IHByZWRfY3RtYXggLSBkYWlseV9tYXgpICU+JSAKICAjZmlsdGVyKGxpbV9kaWZmIDw9IDApICU+JSAgCiAgbXV0YXRlKGRveSA9IHlkYXkoZGF0ZSksCiAgICAgICAgICJtZXRob2QiID0gIkNvbnN0YW50X2FjY2xpbWF0aW9uIikKCiMgZ2dwbG90KGhpbmQyX2RhdGEsIGFlcyh4ID0gZGFpbHlfbWVhbiwgeSA9IHByZWRfY3RtYXgsIGNvbG91ciA9IHNwZWNpZXMpKSArCiMgICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iKSAKCiMgdGFibGUoaGluZDJfZGF0YSRzcGVjaWVzKQpoaW5kMl9kYXRhICU+JSAgCiAgZmlsdGVyKGxpbV9kaWZmIDw9IDUpICU+JSAgCiAgZ2dwbG90KGFlcyh4ID0gZG95LCB5ID0gbGltX2RpZmYsIGNvbG91ciA9IHNwZWNpZXMpKSArCiAgZ2VvbV9obGluZSh5aW50ZXJjZXB0ID0gMCkgKyAKICBnZW9tX2hsaW5lKHlpbnRlcmNlcHQgPSA1LCAKICAgICAgICAgICAgIGNvbG91ciA9ICJncmV5IikgKyAKICBnZW9tX3BvaW50KGFscGhhID0gMC41KSArCiAgZ2VvbV9zbW9vdGgoKSArIAogIGxhYnMoeCA9ICJEYXkgb2YgWWVhciIsIAogICAgICAgeSA9ICJQcmVkaWN0ZWQgV2FybWluZyBUb2xlcmFuY2UgXG4owrBDIEFib3ZlIERhaWx5IE1heCkiKSArIAogIHRoZW1lX21hdHQoKSArIAogIHRoZW1lKGxlZ2VuZC5wb3NpdGlvbiA9ICJyaWdodCIpCmBgYAoKIyMjIFNjZW5hcmlvIDMKVGhlIGZpbmFsIHNjZW5hcmlvIGFsbG93cyB0aGUgZW52aXJvbm1lbnRhbCB2YXJpYWJsZSB1c2VkIHRvIHByZWRpY3QgQ1RtYXggdG8gdmFyeSBiZXR3ZWVuIHNwZWNpZXMuIEZvciBzcGVjaWVzIG9ic2VydmVkIGluIGZld2VyIHRoYW4gNSBjb2xsZWN0aW9ucywgd2UgdXNlIHRoZSBzYW1lIGFwcHJvYWNoIGFzIGluIFNjZW5hcmlvIDIuIEZvciBzcGVjaWVzIG9ic2VydmVkIGluIG1vcmUgdGhhbiA1IGNvbGxlY3Rpb25zLCBob3dldmVyLCB0aGUgZmFjdG9yIHdpdGggdGhlIHN0cm9uZ2VzdCBjb3JyZWxhdGlvbiB3aXRoIENUbWF4IGlzIHVzZWQgdG8gcHJlZGljdCB0aGVybWFsIGxpbWl0cy4gVGhlc2UgZmFjdG9ycyBhcmUgaW5jbHVkZWQgYmVsb3cuCgpgYGB7cn0KaGluZF9wcmVkcyA9IGNvcnJfdmFscyAlPiUgIAogIGZpbHRlcihzaWcgPT0gIlNpZy4iKSAlPiUgCiAgZHJvcF9uYShjb3JyZWxhdGlvbikgJT4lIAogIGdyb3VwX2J5KHNwX25hbWUpICU+JQogIGFycmFuZ2UoZGVzYyhjb3JyZWxhdGlvbikpICU+JSAKICBzbGljZV9oZWFkKG4gPSAxKSAlPiUgCiAgc2VsZWN0KCJTcGVjaWVzIiA9IHNwX25hbWUsICJQcmVkaWN0b3IiID0gcGFyYW1ldGVyLCAiRHVyYXRpb24iID0gZHVyYXRpb24sICJDb3JyZWxhdGlvbiIgPSBjb3JyZWxhdGlvbiwgIlAtVmFsdWUiID0gcC52YWx1ZSkKCmtuaXRyOjprYWJsZShoaW5kX3ByZWRzLCBhbGlnbiA9ICJjIikKYGBgCgpgYGB7cn0KaGluZDNfZGF0YSA9IGhpbmQyX2RhdGEgJT4lICMgQ29udGFpbnMgZGF0YSBmb3Igc3BlY2llcyB0aGF0IHdvbid0IGNoYW5nZSBmcm9tIHNjZW5hcmlvIDIKICBmaWx0ZXIoIShzcGVjaWVzICVpbiUgY29ycl92YWxzJHNwX25hbWUpKQoKcHJlZHNfdG9fcHVsbCA9IGhpbmRfcHJlZHMgJT4lICAKICBzZWxlY3QoU3BlY2llcywgUHJlZGljdG9yLCBEdXJhdGlvbikgCgpmb3IoaSBpbiAxOmxlbmd0aChwcmVkc190b19wdWxsJFNwZWNpZXMpKXsKICAKICBpZihwcmVkc190b19wdWxsJER1cmF0aW9uW2ldID09ICJwcmlvciIpeyAjVGhlIHByaW9yIGRheSB0ZW1wZXJhdHVyZSBtZXRyaWNzIHNob3VsZCBiZSB1c2VkCiAgICBkdXJhdGlvbiA9IE5BCiAgICAKICAgIHByZWRpY3RvcnMgPSBoaW5kX2RhaWx5X3RlbXBfZGF0YSAlPiUgCiAgICAgIG11dGF0ZShkYXRlID0gZGF0ZSArIDEpIAogICAgCiAgICBwYXJhbWV0ZXIgPSBwcmVkc190b19wdWxsJFByZWRpY3RvcltpXQogICAgCiAgICBtb2RlbF9kYXRhID0gZnVsbF9kYXRhICU+JQogICAgICBmaWx0ZXIoc3BfbmFtZSAlaW4lIHByZWRzX3RvX3B1bGwkU3BlY2llc1tpXSkgJT4lIAogICAgICBmaWx0ZXIoc2V4ID09ICJmZW1hbGUiKSAlPiUgCiAgICAgIG11dGF0ZShjb2xsZWN0aW9uX2RhdGUgPSBhc19kYXRlKGNvbGxlY3Rpb25fZGF0ZSkpICU+JSAKICAgICAgaW5uZXJfam9pbihwcmVkaWN0b3JzLCBqb2luX2J5KGNvbGxlY3Rpb25fZGF0ZSA9PSBkYXRlKSkgJT4lICAKICAgICAgc2VsZWN0KGN0bWF4LCBjb250YWlucyhwYXJhbWV0ZXIpKQogICAgCiAgICBpZihkaW0obW9kZWxfZGF0YSlbMl0gPT0gMil7CiAgICAgIGhpbmQubW9kZWwgPSBsbShkYXRhID0gbW9kZWxfZGF0YSwgCiAgICAgICAgICAgICAgICAgICAgICBjdG1heCB+IC4pCiAgICAgIAogICAgICBzcF9kYXRhID0gcHJlZGljdG9ycyAlPiUgCiAgICAgICAgc2VsZWN0KGRhdGUsIGNvbnRhaW5zKHBhcmFtZXRlcikpICU+JSAKICAgICAgICBtdXRhdGUocHJlZF9jdG1heCA9IHByZWRpY3QoaGluZC5tb2RlbCwgbmV3ZGF0YSA9IC4pKSAlPiUgIAogICAgICAgIHNlbGVjdChkYXRlLCBwcmVkX2N0bWF4KSAlPiUgCiAgICAgICAgaW5uZXJfam9pbihoaW5kX2RhaWx5X3RlbXBfZGF0YSwgYnkgPSBjKCJkYXRlIikpICU+JSAKICAgICAgICBtdXRhdGUoInNwZWNpZXMiID0gcHJlZHNfdG9fcHVsbCRTcGVjaWVzW2ldLAogICAgICAgICAgICAgICAiZG95IiA9IHlkYXkoZGF0ZSksCiAgICAgICAgICAgICAgIGxpbV9kaWZmID0gcHJlZF9jdG1heCAtIG1heF90ZW1wKSAlPiUgCiAgICAgICAgc2VsZWN0KGRhdGUsIGRhaWx5X21lYW4gPSBtZWFuX3RlbXAsIGRhaWx5X21heCA9IG1heF90ZW1wLCBzcGVjaWVzLCBwcmVkX2N0bWF4LCBsaW1fZGlmZiwgZG95KQogICAgICAKICAgICAgaGluZDNfZGF0YSA9IGJpbmRfcm93cyhoaW5kM19kYXRhLCBzcF9kYXRhKQogICAgfWVsc2V7CiAgICAgIHByaW50KCJUb28gbWFueSBjb2x1bW5zIHNlbGVjdGVkIikKICAgIH0KICAgIAogICAgCiAgfWVsc2V7CiAgICBkdXJhdGlvbiA9IGFzLm51bWVyaWMocHJlZHNfdG9fcHVsbCREdXJhdGlvbltpXSkKICB9CiAgCiAgaWYocHJlZHNfdG9fcHVsbCREdXJhdGlvbltpXSAhPSAicHJpb3IiICYgaXMubmEoZHVyYXRpb24pKXsgI0RhaWx5IHRlbXBlcmF0dXJlcyBzaG91bGQgYmUgdXNlZCwgYXMgaW4gU2NlbmFyaW8gMgogICAgc3BfZGF0YSA9IGhpbmQyX2RhdGEgJT4lIAogICAgICBmaWx0ZXIoc3BlY2llcyA9PSBwcmVkc190b19wdWxsJFNwZWNpZXNbaV0pCiAgICAKICAgIGhpbmQzX2RhdGEgPSBiaW5kX3Jvd3MoaGluZDNfZGF0YSwgc3BfZGF0YSkKICB9CiAgCiAgaWYoaXMubnVtZXJpYyhkdXJhdGlvbikpewogICAgI05laXRoZXIgdGhlIHByaW9yIGRheSBub3IgZGF5IG9mIG1ldHJpY3Mgc2hvdWxkIGJlIHVzZWQ7IHVzZSBkdXJhdGlvbiBhcyBuX2RheXMKICAgIAogICAgcHJlZGljdG9ycyA9IGdldF9wcmVkaWN0b3JzKGRhaWx5X3ZhbHVlcyA9IGhpbmRfZGFpbHlfdGVtcF9kYXRhLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByYXdfdGVtcCA9IGhpbmRfdGVtcF9kYXRhLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBuX2RheXMgPSBkdXJhdGlvbikKICAgIAogICAgcGFyYW1ldGVyID0gcHJlZHNfdG9fcHVsbCRQcmVkaWN0b3JbaV0KICAgIAogICAgbW9kZWxfZGF0YSA9IGZ1bGxfZGF0YSAlPiUKICAgICAgZmlsdGVyKHNwX25hbWUgJWluJSBwcmVkc190b19wdWxsJFNwZWNpZXNbaV0pICU+JSAKICAgICAgZmlsdGVyKHNleCA9PSAiZmVtYWxlIikgJT4lIAogICAgICBtdXRhdGUoY29sbGVjdGlvbl9kYXRlID0gYXNfZGF0ZShjb2xsZWN0aW9uX2RhdGUpKSAlPiUgCiAgICAgIGlubmVyX2pvaW4ocHJlZGljdG9ycywgam9pbl9ieShjb2xsZWN0aW9uX2RhdGUgPT0gZGF0ZSkpICU+JSAgCiAgICAgIHNlbGVjdChjdG1heCwgY29udGFpbnMocGFzdGUoImRheV8iLCBwYXJhbWV0ZXIsIHNlcCA9ICIiKSkpCiAgICAKICAgIGlmKGRpbShtb2RlbF9kYXRhKVsyXSA9PSAyKXsKICAgICAgaGluZC5tb2RlbCA9IGxtKGRhdGEgPSBtb2RlbF9kYXRhLCAKICAgICAgICAgICAgICAgICAgICAgIGN0bWF4IH4gLikKICAgICAgCiAgICAgIHNwX2RhdGEgPSBwcmVkaWN0b3JzICU+JSAKICAgICAgICBzZWxlY3QoZGF0ZSwgY29udGFpbnMocGFyYW1ldGVyKSkgJT4lIAogICAgICAgIG11dGF0ZShwcmVkX2N0bWF4ID0gcHJlZGljdChoaW5kLm1vZGVsLCBuZXdkYXRhID0gLikpICU+JSAgCiAgICAgICAgc2VsZWN0KGRhdGUsIHByZWRfY3RtYXgpICU+JSAKICAgICAgICBpbm5lcl9qb2luKGhpbmRfZGFpbHlfdGVtcF9kYXRhLCBieSA9IGMoImRhdGUiKSkgJT4lIAogICAgICAgIG11dGF0ZSgic3BlY2llcyIgPSBwcmVkc190b19wdWxsJFNwZWNpZXNbaV0sCiAgICAgICAgICAgICAgICJkb3kiID0geWRheShkYXRlKSwKICAgICAgICAgICAgICAgbGltX2RpZmYgPSBwcmVkX2N0bWF4IC0gbWF4X3RlbXApICU+JSAKICAgICAgICBzZWxlY3QoZGF0ZSwgZGFpbHlfbWVhbiA9IG1lYW5fdGVtcCwgZGFpbHlfbWF4ID0gbWF4X3RlbXAsIHNwZWNpZXMsIHByZWRfY3RtYXgsIGxpbV9kaWZmLCBkb3kpCiAgICAgIAogICAgICBoaW5kM19kYXRhID0gYmluZF9yb3dzKGhpbmQzX2RhdGEsIHNwX2RhdGEpCiAgICAgIAogICAgfWVsc2V7CiAgICAgIHByaW50KCJUb28gbWFueSBjb2x1bW5zIHNlbGVjdGVkIikKICAgIH0KICAgIAogIH0KfQoKaGluZDNfZGF0YSA9IGhpbmQzX2RhdGEgJT4lIAogIG11dGF0ZSgibWV0aG9kIiA9ICJWYXJpYWJsZV9hY2NsaW1hdGlvbiIpCmBgYAoKVGhpcyB0aGlyZCBhcHByb2FjaCBkaWQgbm90IGFmZmVjdCB0aGUgcHJlZGljdGVkIHBhdHRlcm5zIGluICpMaW1ub2NhbGFudXMqIG9yICpTZW5lY2VsbGEqIChuZWl0aGVyIHNwZWNpZXMgaGFzIGJlZW4gb2JzZXJ2ZWQgaW4gZW5vdWdoIGNvbGxlY3Rpb25zIHRvIGVzdGltYXRlIHRoZSBlZmZlY3RzIG9mIGRpZmZlcmVudCBlbnZpcm9ubWVudGFsIGZhY3RvcnMpLiBDaGFuZ2luZyB0aGUgYWNjbGltYXRpb24gYXBwcm9hY2ggZGlkIGFmZmVjdCBwYXR0ZXJucyBpbiB0aGVybWFsIGxpbWl0cyBpbiB0aGUgb3RoZXIgc3BlY2llcyB0aG91Z2guIFRoZSBmaWd1cmUgYmVsb3cgc2hvd3MgaG93IHByZWRpY3RlZCB3YXJtaW5nIHRvbGVyYW5jZSB2YXJpZXMgb3ZlciB0aGUgeWVhciBpbiB0aGUgc2V2ZW4gc3BlY2llcywgYmFzZWQgb24gdGhlIHRocmVlIGRpZmZlcmVudCBwcmVkaWN0aW9uIG1ldGhvZHMuIEluIGdlbmVyYWwsIGNvbnN0YW50IHRoZXJtYWwgbGltaXRzICh0aGUgJ25vIGFjY2xpbWF0aW9uJyBtZXRob2QpIHJlc3VsdGVkIGluIGxhcmdlciB3YXJtaW5nIHRvbGVyYW5jZSBkdXJpbmcgdGhlIHdpbnRlciBhbmQgbG93ZXIgd2FybWluZyB0b2xlcmFuY2UgZHVyaW5nIHRoZSBzdW1tZXIsIGFsdGhvdWdoIHRoaXMgZWZmZWN0IHdhcyBzbWFsbCBpbiBtb3N0IHNwZWNpZXMuICAgICAKCmBgYHtyIGZpZy53aWR0aD0xMCwgZmlnLmhlaWdodD0xMH0Kc3ludGhlc2lzID0gYmluZF9yb3dzKAogIHNlbGVjdChoaW5kMV9kYXRhLCBkYXRlLCBkb3ksIGRhaWx5X21lYW4sIGRhaWx5X21heCwgc3BlY2llcywgInByZWRfY3RtYXgiID0gbWVhbl9jdG1heCwgbGltX2RpZmYsIG1ldGhvZCksCiAgc2VsZWN0KGhpbmQyX2RhdGEsIGRhdGUsIGRveSwgZGFpbHlfbWVhbiwgZGFpbHlfbWF4LCAgc3BlY2llcywgcHJlZF9jdG1heCwgbGltX2RpZmYsIG1ldGhvZCksCiAgc2VsZWN0KGhpbmQzX2RhdGEsIGRhdGUsIGRveSwgZGFpbHlfbWVhbiwgZGFpbHlfbWF4LCAgc3BlY2llcywgcHJlZF9jdG1heCwgbGltX2RpZmYsIG1ldGhvZCkpICU+JSAKICBtdXRhdGUobWV0aG9kID0gZmN0X3JlbGV2ZWwobWV0aG9kLCAiTm9fYWNjbGltYXRpb24iLCAiQ29uc3RhbnRfYWNjbGltYXRpb24iLCAiVmFyaWFibGVfYWNjbGltYXRpb24iKSkKCmNsaW1hdG9sb2d5ID0gc3ludGhlc2lzICU+JSAKICBncm91cF9ieShzcGVjaWVzLCBkb3ksIG1ldGhvZCkgJT4lICAKICBzdW1tYXJpc2UoIm1lYW5fZGlmZiIgPSBtZWFuKGxpbV9kaWZmKSwKICAgICAgICAgICAgIm1pbl9kaWZmIiA9IG1pbihsaW1fZGlmZiksCiAgICAgICAgICAgICJtYXhfZGlmZiIgPSBtYXgobGltX2RpZmYpKSAlPiUgCiAgbXV0YXRlKG1ldGhvZCA9IGZjdF9yZWxldmVsKG1ldGhvZCwgIk5vX2FjY2xpbWF0aW9uIiwgIkNvbnN0YW50X2FjY2xpbWF0aW9uIiwgIlZhcmlhYmxlX2FjY2xpbWF0aW9uIikpCgphY2NfZWZmZWN0cyA9IHN5bnRoZXNpcyAlPiUgCiAgcGl2b3Rfd2lkZXIoaWRfY29scyA9IGMoZGF0ZSwgc3BlY2llcywgZG95KSwgCiAgICAgICAgICAgICAgbmFtZXNfZnJvbSA9IG1ldGhvZCwgCiAgICAgICAgICAgICAgdmFsdWVzX2Zyb20gPSBsaW1fZGlmZikgJT4lICAKICBtdXRhdGUoImNvbnN0X2FjY19lZmZlY3QiID0gQ29uc3RhbnRfYWNjbGltYXRpb24gLSBOb19hY2NsaW1hdGlvbiwKICAgICAgICAgInZhcl9hY2NfZWZmZWN0IiA9IFZhcmlhYmxlX2FjY2xpbWF0aW9uIC0gTm9fYWNjbGltYXRpb24pCgpnZ3Bsb3Qoc3ludGhlc2lzLCBhZXMoeCA9IGRveSwgeSA9IGxpbV9kaWZmLCBjb2xvdXIgPSBtZXRob2QpKSArIAogIGZhY2V0X3dyYXAoc3BlY2llc34uKSArIAogIGdlb21faGxpbmUoeWludGVyY2VwdCA9IDApICsgCiAgZ2VvbV9obGluZSh5aW50ZXJjZXB0ID0gNSwgY29sb3VyID0gImdyZXkiKSArIAogIGdlb21fcG9pbnQoYWxwaGEgPSAwLjEpICsgCiAgbGFicyh4ID0gIkRheSBvZiBZZWFyIiwgCiAgICAgICB5ID0gIlByZWRpY3RlZCBXYXJtaW5nIFRvbGVyYW5jZSAowrBDIEFib3ZlIERhaWx5IE1heCkiKSArIAogIGd1aWRlcyhjb2xvdXIgPSBndWlkZV9sZWdlbmQob3ZlcnJpZGUuYWVzID0gbGlzdChhbHBoYSA9IDEpKSkgKyAKICB0aGVtZV9tYXR0X2ZhY2V0cyhiYXNlX3NpemUgPSAxOCkgKyAKICB0aGVtZShzdHJpcC50ZXh0LngudG9wID0gZWxlbWVudF90ZXh0KHNpemUgPSAxMCkpCmBgYAoKYGBge3IsIGluY2x1ZGUgPSBGfQp5ZWFybHlfc3VtbWFyeSA9IHN5bnRoZXNpcyAlPiUgIAogIG11dGF0ZSgieWVhciIgPSB5ZWFyKGRhdGUpKSAlPiUgCiAgZ3JvdXBfYnkoc3BlY2llcywgeWVhciwgbWV0aG9kKSAlPiUgCiAgc3VtbWFyaXNlKCJtaW5fd3QiID0gbWluKGxpbV9kaWZmKSwKICAgICAgICAgICAgIm1heF93dCIgPSBtYXgobGltX2RpZmYpKSAlPiUgCiAgcGl2b3RfbG9uZ2VyKGNvbHMgPSBjKG1pbl93dCwgbWF4X3d0KSwgCiAgICAgICAgICAgICAgIG5hbWVzX3RvID0gIm1ldHJpYyIsIAogICAgICAgICAgICAgICB2YWx1ZXNfdG8gPSAid3QiKQoKZ2dwbG90KHllYXJseV9zdW1tYXJ5LCBhZXMoeCA9IG1ldGhvZCwgeSA9IHd0LCBjb2xvdXIgPSBtZXRyaWMpKSArIAogIGZhY2V0X3dyYXAoLn5zcGVjaWVzKSArIAogIGdlb21fcG9pbnQoKSArIAogIHRoZW1lX21hdHRfZmFjZXRzKCkgKyAKICB0aGVtZShheGlzLnRleHQueCA9IGVsZW1lbnRfdGV4dChhbmdsZSA9IDMwMCwgaGp1c3QgPSAwLCB2anVzdCA9IDAuNSkpCmBgYAoK